Developer CD Series 2000 February: Tool Chest

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 February: Tool Chest / Dev.CD Feb 00 TC.toast / pc / tool chest / macapp / install macapp r13u4 / Apple Frameworks / MacApp / Tools / Conversion to R13 / Schedule example / UScheduleCommand.cp < prev next >
MacBinary | 1998-10-13 | 25.6 KB | [TEXT/CWIE]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	MS-DOS Code Page Info `(other/dosCodePage)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Tue Oct 13 06:00:00 1998, modified Tue Oct 13 06:00:00 1998, creator 'CWIE', type ASCII, 25368 bytes "UScheduleCommand.cp" , at 0x6398 614 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[CWIE]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 13 55 53 63 68 65 64 | 75 6c 65 43 6f 6d 6d 61 |..USched|uleComma|
|00000010| 6e 64 2e 63 70 00 00 00 | 00 00 00 00 00 00 00 00 |nd.cp...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 63 18 00 | 00 02 66 b2 48 d5 20 b2 |.....c..|..f.H. .|
|00000060| 48 d5 20 00 00 0c 00 00 | 00 00 00 00 00 00 00 00 |H. .....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ef f9 00 00 |........|........|
|00000080| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 55 53 |--------|--.// US|
|000000e0| 63 68 65 64 75 6c 65 43 | 6f 6d 6d 61 6e 64 2e 63 |cheduleC|ommand.c|
|000000f0| 70 0d 2f 2f 20 43 6f 70 | 79 72 69 67 68 74 20 a9 |p.// Cop|yright .|
|00000100| 20 31 39 39 31 2d 39 38 | 20 41 70 70 6c 65 20 43 | 1991-98| Apple C|
|00000110| 6f 6d 70 75 74 65 72 2c | 20 49 6e 63 2e 0d 2f 2f |omputer,| Inc..//|
|00000120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0d 2f 2a 0d 09 43 68 |--------|../*..Ch|
|00000180| 61 6e 67 65 20 48 69 73 | 74 6f 72 79 3a 0d 09 09 |ange His|tory:...|
|00000190| 30 35 2f 31 39 2f 39 38 | 09 55 70 64 61 74 65 20 |05/19/98|.Update |
|000001a0| 61 67 61 69 6e 20 66 6f | 72 20 6e 65 77 20 43 4d |again fo|r new CM|
|000001b0| 75 6c 74 69 4c 6f 63 61 | 6c 65 20 63 61 6c 6c 73 |ultiLoca|le calls|
|000001c0| 2e 20 0d 2a 2f 0d 0d 23 | 69 66 6e 64 65 66 20 5f |. .*/..#|ifndef _|
|000001d0| 5f 55 4d 41 43 41 50 50 | 55 54 49 4c 49 54 49 45 |_UMACAPP|UTILITIE|
|000001e0| 53 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 3c 55 4d |S__.#inc|lude <UM|
|000001f0| 61 63 41 70 70 55 74 69 | 6c 69 74 69 65 73 2e 68 |acAppUti|lities.h|
|00000200| 3e 0d 23 65 6e 64 69 66 | 0d 0d 23 69 66 6e 64 65 |>.#endif|..#ifnde|
|00000210| 66 20 5f 5f 55 53 43 48 | 45 44 55 4c 45 43 4f 4d |f __USCH|EDULECOM|
|00000220| 4d 41 4e 44 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |MAND__.#|include |
|00000230| 22 55 53 63 68 65 64 75 | 6c 65 43 6f 6d 6d 61 6e |"USchedu|leComman|
|00000240| 64 2e 68 22 0d 23 65 6e | 64 69 66 0d 0d 23 69 66 |d.h".#en|dif..#if|
|00000250| 6e 64 65 66 20 5f 5f 55 | 53 43 48 45 44 55 4c 45 |ndef __U|SCHEDULE|
|00000260| 41 50 50 4c 49 43 41 54 | 49 4f 4e 5f 5f 0d 23 69 |APPLICAT|ION__.#i|
|00000270| 6e 63 6c 75 64 65 20 22 | 55 53 63 68 65 64 75 6c |nclude "|USchedul|
|00000280| 65 41 70 70 6c 69 63 61 | 74 69 6f 6e 2e 68 22 0d |eApplica|tion.h".|
|00000290| 23 65 6e 64 69 66 0d 0d | 23 69 66 6e 64 65 66 20 |#endif..|#ifndef |
|000002a0| 5f 5f 55 53 43 48 45 44 | 55 4c 45 44 4f 43 55 4d |__USCHED|ULEDOCUM|
|000002b0| 45 4e 54 5f 5f 0d 23 69 | 6e 63 6c 75 64 65 20 22 |ENT__.#i|nclude "|
|000002c0| 55 53 63 68 65 64 75 6c | 65 44 6f 63 75 6d 65 6e |USchedul|eDocumen|
|000002d0| 74 2e 68 22 0d 23 65 6e | 64 69 66 0d 0d 23 69 66 |t.h".#en|dif..#if|
|000002e0| 6e 64 65 66 20 5f 5f 55 | 53 43 48 45 44 55 4c 45 |ndef __U|SCHEDULE|
|000002f0| 56 49 45 57 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |VIEW__.#|include |
|00000300| 22 55 53 63 68 65 64 75 | 6c 65 56 69 65 77 2e 68 |"USchedu|leView.h|
|00000310| 22 0d 23 65 6e 64 69 66 | 0d 0d 23 69 66 6e 64 65 |".#endif|..#ifnde|
|00000320| 66 20 5f 5f 55 47 52 49 | 44 56 49 45 57 5f 5f 0d |f __UGRI|DVIEW__.|
|00000330| 23 69 6e 63 6c 75 64 65 | 20 3c 55 47 72 69 64 56 |#include| <UGridV|
|00000340| 69 65 77 2e 68 3e 0d 23 | 65 6e 64 69 66 0d 0d 23 |iew.h>.#|endif..#|
|00000350| 69 66 6e 64 65 66 20 5f | 5f 55 44 49 41 4c 4f 47 |ifndef _|_UDIALOG|
|00000360| 5f 5f 0d 23 69 6e 63 6c | 75 64 65 20 3c 55 44 69 |__.#incl|ude <UDi|
|00000370| 61 6c 6f 67 2e 68 3e 0d | 23 65 6e 64 69 66 0d 0d |alog.h>.|#endif..|
|00000380| 23 69 66 6e 64 65 66 20 | 5f 5f 50 50 43 54 4f 4f |#ifndef |__PPCTOO|
|00000390| 4c 42 4f 58 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |LBOX__.#|include |
|000003a0| 3c 50 50 43 54 6f 6f 6c | 62 6f 78 2e 68 3e 0d 23 |<PPCTool|box.h>.#|
|000003b0| 65 6e 64 69 66 0d 0d 23 | 69 66 6e 64 65 66 20 5f |endif..#|ifndef _|
|000003c0| 5f 45 52 52 4f 52 53 5f | 5f 0d 23 69 6e 63 6c 75 |_ERRORS_|_.#inclu|
|000003d0| 64 65 20 3c 45 72 72 6f | 72 73 2e 68 3e 0d 23 65 |de <Erro|rs.h>.#e|
|000003e0| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |ndif..#i|fndef __|
|000003f0| 45 50 50 43 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |EPPC__.#|include |
|00000400| 3c 45 50 50 43 2e 68 3e | 0d 23 65 6e 64 69 66 0d |<EPPC.h>|.#endif.|
|00000410| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 54 4f 4f 4c 55 |.#ifndef| __TOOLU|
|00000420| 54 49 4c 53 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |TILS__.#|include |
|00000430| 3c 54 6f 6f 6c 55 74 69 | 6c 73 2e 68 3e 0d 23 65 |<ToolUti|ls.h>.#e|
|00000440| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |ndif..#i|fndef __|
|00000450| 55 57 49 4e 44 4f 57 5f | 5f 0d 23 69 6e 63 6c 75 |UWINDOW_|_.#inclu|
|00000460| 64 65 20 3c 55 57 69 6e | 64 6f 77 2e 68 3e 0d 23 |de <UWin|dow.h>.#|
|00000470| 65 6e 64 69 66 0d 0d 23 | 69 66 6e 64 65 66 20 5f |endif..#|ifndef _|
|00000480| 5f 55 56 49 45 57 53 45 | 52 56 45 52 5f 5f 0d 23 |_UVIEWSE|RVER__.#|
|00000490| 69 6e 63 6c 75 64 65 20 | 3c 55 56 69 65 77 53 65 |include |<UViewSe|
|000004a0| 72 76 65 72 2e 68 3e 0d | 23 65 6e 64 69 66 0d 0d |rver.h>.|#endif..|
|000004b0| 23 69 66 6e 64 65 66 20 | 5f 5f 55 44 49 41 4c 4f |#ifndef |__UDIALO|
|000004c0| 47 42 45 48 41 56 49 4f | 52 5f 5f 0d 23 69 6e 63 |GBEHAVIO|R__.#inc|
|000004d0| 6c 75 64 65 20 3c 55 44 | 69 61 6c 6f 67 42 65 68 |lude <UD|ialogBeh|
|000004e0| 61 76 69 6f 72 2e 68 3e | 0d 23 65 6e 64 69 66 0d |avior.h>|.#endif.|
|000004f0| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 55 43 4c 49 50 |.#ifndef| __UCLIP|
|00000500| 42 4f 41 52 44 4d 47 52 | 5f 5f 0d 23 69 6e 63 6c |BOARDMGR|__.#incl|
|00000510| 75 64 65 20 3c 55 43 6c | 69 70 62 6f 61 72 64 4d |ude <UCl|ipboardM|
|00000520| 67 72 2e 68 3e 0d 23 65 | 6e 64 69 66 0d 0d 23 69 |gr.h>.#e|ndif..#i|
|00000530| 66 6e 64 65 66 20 5f 5f | 55 45 52 52 4f 52 4d 47 |fndef __|UERRORMG|
|00000540| 52 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 3c 55 45 |R__.#inc|lude <UE|
|00000550| 72 72 6f 72 4d 67 72 2e | 68 3e 0d 23 65 6e 64 69 |rrorMgr.|h>.#endi|
|00000560| 66 0d 0d 23 69 66 6e 64 | 65 66 20 5f 5f 55 41 50 |f..#ifnd|ef __UAP|
|00000570| 50 4c 45 45 56 45 4e 54 | 53 5f 5f 0d 23 69 6e 63 |PLEEVENT|S__.#inc|
|00000580| 6c 75 64 65 20 3c 55 41 | 70 70 6c 65 45 76 65 6e |lude <UA|ppleEven|
|00000590| 74 73 2e 68 3e 0d 23 65 | 6e 64 69 66 0d 0d 2f 2f |ts.h>.#e|ndif..//|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0d 2f 2f 20 41 70 70 |--------|..// App|
|00000600| 6c 65 45 76 65 6e 74 20 | 69 64 65 6e 74 69 66 69 |leEvent |identifi|
|00000610| 65 72 73 0d 63 6f 6e 73 | 74 20 4f 53 54 79 70 65 |ers.cons|t OSType|
|00000620| 20 6b 41 45 53 63 68 65 | 64 75 6c 65 53 75 69 74 | kAESche|duleSuit|
|00000630| 65 49 44 09 09 09 3d 20 | 27 53 4b 44 4c 27 3b 0d |eID...= |'SKDL';.|
|00000640| 63 6f 6e 73 74 20 4f 53 | 54 79 70 65 20 6b 41 45 |const OS|Type kAE|
|00000650| 4c 6f 6f 6b 75 70 49 44 | 09 09 09 09 3d 20 27 4c |LookupID|....= 'L|
|00000660| 4b 55 50 27 3b 0d 0d 2f | 2f 20 41 70 70 6c 65 45 |KUP';../|/ AppleE|
|00000670| 76 65 6e 74 20 72 65 71 | 75 65 73 74 20 70 61 72 |vent req|uest par|
|00000680| 61 6d 65 74 65 72 20 69 | 64 65 6e 74 69 66 69 65 |ameter i|dentifie|
|00000690| 72 73 0d 63 6f 6e 73 74 | 20 4f 53 54 79 70 65 20 |rs.const| OSType |
|000006a0| 6b 41 45 44 61 79 09 09 | 09 09 09 09 3d 20 27 44 |kAEDay..|....= 'D|
|000006b0| 41 59 20 27 3b 0d 63 6f | 6e 73 74 20 4f 53 54 79 |AY ';.co|nst OSTy|
|000006c0| 70 65 20 6b 41 45 54 69 | 6d 65 09 09 09 09 09 3d |pe kAETi|me.....=|
|000006d0| 20 27 54 49 4d 45 27 3b | 0d 0d 2f 2f 20 52 65 73 | 'TIME';|..// Res|
|000006e0| 70 6f 6e 73 65 20 70 61 | 72 61 6d 65 74 65 72 73 |ponse pa|rameters|
|000006f0| 0d 63 6f 6e 73 74 20 4f | 53 54 79 70 65 20 6b 41 |.const O|SType kA|
|00000700| 45 44 75 72 61 74 69 6f | 6e 09 09 09 09 3d 20 27 |EDuratio|n....= '|
|00000710| 44 55 52 20 27 3b 0d 63 | 6f 6e 73 74 20 4f 53 54 |DUR ';.c|onst OST|
|00000720| 79 70 65 20 6b 41 45 44 | 6f 63 75 6d 65 6e 74 09 |ype kAED|ocument.|
|00000730| 09 09 09 3d 20 27 44 4f | 43 20 27 3b 0d 0d 2f 2a |...= 'DO|C ';../*|
|00000740| 20 42 75 7a 7a 20 53 74 | 72 69 6e 67 20 2a 2f 0d | Buzz St|ring */.|
|00000750| 0d 63 6f 6e 73 74 20 52 | 65 73 4e 75 6d 62 65 72 |.const R|esNumber|
|00000760| 20 6b 4c 6f 6f 6b 75 70 | 42 75 7a 7a 09 09 09 09 | kLookup|Buzz....|
|00000770| 3d 20 31 30 31 32 3b 0d | 63 6f 6e 73 74 20 73 68 |= 1012;.|const sh|
|00000780| 6f 72 74 20 6b 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |ort kApp|ointment|
|00000790| 41 76 61 69 6c 61 62 6c | 65 09 09 3d 20 31 3b 0d |Availabl|e..= 1;.|
|000007a0| 63 6f 6e 73 74 20 73 68 | 6f 72 74 20 6b 50 50 43 |const sh|ort kPPC|
|000007b0| 50 72 6f 6d 70 74 09 09 | 09 09 09 3d 20 32 3b 0d |Prompt..|...= 2;.|
|000007c0| 63 6f 6e 73 74 20 73 68 | 6f 72 74 20 6b 50 50 43 |const sh|ort kPPC|
|000007d0| 54 79 70 65 09 09 09 09 | 09 3d 20 33 3b 0d 0d 2f |Type....|.= 3;../|
|000007e0| 2a 20 43 75 73 74 6f 6d | 20 65 72 72 6f 72 20 72 |* Custom| error r|
|000007f0| 65 73 75 6c 74 20 2a 2f | 0d 63 6f 6e 73 74 20 4f |esult */|.const O|
|00000800| 53 45 72 72 20 65 72 72 | 41 70 70 6f 69 6e 74 6d |SErr err|Appointm|
|00000810| 65 6e 74 4e 6f 74 41 76 | 61 69 6c 61 62 6c 65 09 |entNotAv|ailable.|
|00000820| 3d 20 2d 32 36 30 30 31 | 3b 0d 0d 2f 2f 2d 2d 2d |= -26001|;..//---|
|00000830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000850| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000880| 2d 2d 2d 2d 2d 0d 23 70 | 72 61 67 6d 61 20 73 65 |-----.#p|ragma se|
|00000890| 67 6d 65 6e 74 20 41 53 | 65 6c 43 6f 6d 6d 61 6e |gment AS|elComman|
|000008a0| 64 0d 0d 73 74 61 74 69 | 63 20 70 61 73 63 61 6c |d..stati|c pascal|
|000008b0| 20 42 6f 6f 6c 65 61 6e | 20 4d 79 50 50 43 42 72 | Boolean| MyPPCBr|
|000008c0| 6f 77 73 65 72 46 69 6c | 74 65 72 28 4c 6f 63 61 |owserFil|ter(Loca|
|000008d0| 74 69 6f 6e 4e 61 6d 65 | 50 74 72 20 2f 2a 20 74 |tionName|Ptr /* t|
|000008e0| 68 65 4c 6f 63 61 74 69 | 6f 6e 20 2a 2f 2c 20 50 |heLocati|on */, P|
|000008f0| 6f 72 74 49 6e 66 6f 50 | 74 72 20 74 68 65 50 6f |ortInfoP|tr thePo|
|00000900| 72 74 49 6e 66 6f 29 0d | 2f 2a 0d 20 2a 09 4d 79 |rtInfo).|/*. *.My|
|00000910| 50 50 43 42 72 6f 77 73 | 65 72 46 69 6c 74 65 72 |PPCBrows|erFilter|
|00000920| 0d 20 2a 0d 20 2a 09 54 | 68 61 6e 6b 73 20 74 6f |. *. *.T|hanks to|
|00000930| 20 45 72 69 63 20 42 65 | 72 68 64 61 68 6c 20 26 | Eric Be|rhdahl &|
|00000940| 20 45 72 69 63 20 53 6f | 6c 64 61 6e 20 61 6e 64 | Eric So|ldan and|
|00000950| 20 68 69 73 20 4b 69 62 | 69 74 7a 20 61 70 70 6c | his Kib|itz appl|
|00000960| 69 63 61 74 69 6f 6e 20 | 66 6f 72 20 74 68 65 20 |ication |for the |
|00000970| 74 69 70 73 0d 20 2a 09 | 6f 6e 20 68 6f 77 20 74 |tips. *.|on how t|
|00000980| 6f 20 69 6d 70 6c 65 6d | 65 6e 74 20 74 68 69 73 |o implem|ent this|
|00000990| 20 66 75 6e 63 74 69 6f | 6e 2e 0d 20 2a 2f 0d 7b | functio|n.. */.{|
|000009a0| 0d 09 4f 53 54 79 70 65 | 09 74 79 70 65 3b 0d 0d |..OSType|.type;..|
|000009b0| 09 69 66 20 28 74 68 65 | 50 6f 72 74 49 6e 66 6f |.if (the|PortInfo|
|000009c0| 2d 3e 6e 61 6d 65 2e 70 | 6f 72 74 4b 69 6e 64 53 |->name.p|ortKindS|
|000009d0| 65 6c 65 63 74 6f 72 20 | 3d 3d 20 70 70 63 42 79 |elector |== ppcBy|
|000009e0| 53 74 72 69 6e 67 29 0d | 09 7b 0d 09 09 3a 3a 42 |String).|.{...::B|
|000009f0| 6c 6f 63 6b 4d 6f 76 65 | 28 74 68 65 50 6f 72 74 |lockMove|(thePort|
|00000a00| 49 6e 66 6f 2d 3e 6e 61 | 6d 65 2e 75 2e 70 6f 72 |Info->na|me.u.por|
|00000a10| 74 54 79 70 65 53 74 72 | 20 2b 20 31 2c 20 50 74 |tTypeStr| + 1, Pt|
|00000a20| 72 28 26 74 79 70 65 29 | 2c 20 73 69 7a 65 6f 66 |r(&type)|, sizeof|
|00000a30| 28 74 79 70 65 29 29 3b | 0d 09 09 09 2f 2f 20 54 |(type));|....// T|
|00000a40| 68 65 20 42 6c 6f 63 6b | 4d 6f 76 65 20 69 73 20 |he Block|Move is |
|00000a50| 73 6f 20 74 68 61 74 20 | 77 65 20 64 6f 6e 27 74 |so that |we don't|
|00000a60| 20 67 65 74 20 61 6e 20 | 61 64 64 72 65 73 73 20 | get an |address |
|00000a70| 65 72 72 6f 72 0d 09 09 | 09 2f 2f 20 6f 6e 20 61 |error...|.// on a|
|00000a80| 20 36 38 30 30 30 2d 62 | 61 73 65 64 20 6d 61 63 | 68000-b|ased mac|
|00000a90| 68 69 6e 65 20 64 75 65 | 20 74 6f 20 72 65 66 65 |hine due| to refe|
|00000aa0| 72 65 6e 63 69 6e 67 20 | 61 20 6c 6f 6e 67 20 61 |rencing |a long a|
|00000ab0| 74 0d 09 09 09 2f 2f 20 | 61 6e 20 6f 64 64 2d 61 |t....// |an odd-a|
|00000ac0| 64 64 72 65 73 73 2e 0d | 09 09 69 66 20 28 74 79 |ddress..|..if (ty|
|00000ad0| 70 65 20 3d 3d 20 6b 53 | 69 67 6e 61 74 75 72 65 |pe == kS|ignature|
|00000ae0| 29 0d 09 09 09 72 65 74 | 75 72 6e 20 74 72 75 65 |)....ret|urn true|
|00000af0| 3b 0d 09 7d 0d 0d 09 72 | 65 74 75 72 6e 20 66 61 |;..}...r|eturn fa|
|00000b00| 6c 73 65 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |lse;.}..|//------|
|00000b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b60| 2d 2d 0d 2f 2f 20 43 4c | 41 53 53 20 54 41 70 70 |--.// CL|ASS TApp|
|00000b70| 6f 69 6e 74 6d 65 6e 74 | 45 64 69 74 43 6f 6d 6d |ointment|EditComm|
|00000b80| 61 6e 64 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |and.//--|--------|
|00000b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ba0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 23 |--------|------.#|
|00000be0| 70 72 61 67 6d 61 20 73 | 65 67 6d 65 6e 74 20 41 |pragma s|egment A|
|00000bf0| 44 6f 43 6f 6d 6d 61 6e | 64 0d 0d 23 75 6e 64 65 |DoComman|d..#unde|
|00000c00| 66 20 49 6e 68 65 72 69 | 74 65 64 0d 23 64 65 66 |f Inheri|ted.#def|
|00000c10| 69 6e 65 20 49 6e 68 65 | 72 69 74 65 64 20 54 43 |ine Inhe|rited TC|
|00000c20| 6f 6d 6d 61 6e 64 0d 0d | 54 41 70 70 6f 69 6e 74 |ommand..|TAppoint|
|00000c30| 6d 65 6e 74 45 64 69 74 | 43 6f 6d 6d 61 6e 64 3a |mentEdit|Command:|
|00000c40| 3a 7e 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 45 64 |:~TAppoi|ntmentEd|
|00000c50| 69 74 43 6f 6d 6d 61 6e | 64 28 29 09 09 09 09 09 |itComman|d().....|
|00000c60| 2f 2f 20 4f 56 45 52 52 | 49 44 45 0d 7b 0d 09 2f |// OVERR|IDE.{../|
|00000c70| 2f 20 46 72 65 65 73 20 | 74 68 65 20 63 6c 69 70 |/ Frees |the clip|
|00000c80| 20 61 70 70 6f 69 6e 74 | 6d 65 6e 74 73 20 69 66 | appoint|ments if|
|00000c90| 20 61 70 70 72 6f 70 72 | 69 61 74 65 2c 20 74 68 | appropr|iate, th|
|00000ca0| 65 6e 20 66 72 65 65 73 | 20 74 68 65 20 61 70 70 |en frees| the app|
|00000cb0| 6f 69 6e 74 6d 65 6e 74 | 20 6c 69 73 74 2e 0d 0d |ointment| list...|
|00000cc0| 09 69 66 20 28 66 43 6c | 69 70 41 70 70 6f 69 6e |.if (fCl|ipAppoin|
|00000cd0| 74 6d 65 6e 74 73 20 26 | 26 20 74 68 69 73 2d 3e |tments &|& this->|
|00000ce0| 53 68 6f 75 6c 64 46 72 | 65 65 43 6c 69 70 41 70 |ShouldFr|eeClipAp|
|00000cf0| 70 6f 69 6e 74 6d 65 6e | 74 73 28 29 29 0d 09 09 |pointmen|ts())...|
|00000d00| 46 52 45 45 41 4c 4c 28 | 66 43 6c 69 70 41 70 70 |FREEALL(|fClipApp|
|00000d10| 6f 69 6e 74 6d 65 6e 74 | 73 2c 20 54 41 70 70 6f |ointment|s, TAppo|
|00000d20| 69 6e 74 6d 65 6e 74 2a | 29 3b 0d 0d 09 66 43 6c |intment*|);...fCl|
|00000d30| 69 70 41 70 70 6f 69 6e | 74 6d 65 6e 74 73 20 3d |ipAppoin|tments =|
|00000d40| 20 28 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 4c 69 | (TAppoi|ntmentLi|
|00000d50| 73 74 2a 29 46 72 65 65 | 49 66 4f 62 6a 65 63 74 |st*)Free|IfObject|
|00000d60| 28 66 43 6c 69 70 41 70 | 70 6f 69 6e 74 6d 65 6e |(fClipAp|pointmen|
|00000d70| 74 73 29 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |ts);.}..|//------|
|00000d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000dd0| 2d 2d 0d 23 70 72 61 67 | 6d 61 20 73 65 67 6d 65 |--.#prag|ma segme|
|00000de0| 6e 74 20 41 44 6f 43 6f | 6d 6d 61 6e 64 0d 0d 76 |nt ADoCo|mmand..v|
|00000df0| 6f 69 64 20 54 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |oid TApp|ointment|
|00000e00| 45 64 69 74 43 6f 6d 6d | 61 6e 64 3a 3a 47 65 74 |EditComm|and::Get|
|00000e10| 43 6c 69 70 41 70 70 6f | 69 6e 74 6d 65 6e 74 73 |ClipAppo|intments|
|00000e20| 28 29 0d 7b 0d 09 2f 2f | 20 50 72 65 70 61 72 65 |().{..//| Prepare|
|00000e30| 73 20 74 6f 20 65 64 69 | 74 20 62 79 20 67 65 74 |s to edi|t by get|
|00000e40| 74 69 6e 67 20 63 72 65 | 61 74 69 6e 67 20 61 6e |ting cre|ating an|
|00000e50| 64 20 66 69 6c 6c 69 6e | 67 0d 09 2f 2f 20 74 68 |d fillin|g..// th|
|00000e60| 65 20 6c 69 73 74 20 6f | 66 20 63 6c 69 70 20 61 |e list o|f clip a|
|00000e70| 70 70 6f 69 6e 74 6d 65 | 6e 74 73 2e 0d 0d 09 2f |ppointme|nts..../|
|00000e80| 2f 20 49 74 20 69 73 20 | 62 65 74 74 65 72 20 74 |/ It is |better t|
|00000e90| 6f 20 64 65 66 65 72 20 | 61 6c 6c 6f 63 61 74 69 |o defer |allocati|
|00000ea0| 6e 67 20 74 68 65 20 6c | 69 73 74 20 75 6e 74 69 |ng the l|ist unti|
|00000eb0| 6c 20 44 6f 49 74 20 74 | 69 6d 65 2c 20 62 65 63 |l DoIt t|ime, bec|
|00000ec0| 61 75 73 65 20 74 68 65 | 72 65 20 69 73 0d 09 2f |ause the|re is../|
|00000ed0| 2f 20 6d 6f 72 65 20 6d | 65 6d 6f 72 79 20 61 76 |/ more m|emory av|
|00000ee0| 61 69 6c 61 62 6c 65 2c | 20 73 69 6e 63 65 20 73 |ailable,| since s|
|00000ef0| 65 67 6d 65 6e 74 73 20 | 61 72 65 20 75 6e 6c 6f |egments |are unlo|
|00000f00| 61 64 65 64 20 62 65 66 | 6f 72 65 20 63 6f 6d 6d |aded bef|ore comm|
|00000f10| 61 6e 64 73 20 61 72 65 | 20 64 6f 6e 65 2e 0d 0d |ands are| done...|
|00000f20| 09 2f 2f 20 41 20 66 61 | 69 6c 75 72 65 20 68 61 |.// A fa|ilure ha|
|00000f30| 6e 64 6c 65 72 20 69 73 | 20 6e 6f 74 20 6e 65 63 |ndler is| not nec|
|00000f40| 65 73 73 61 72 79 20 68 | 65 72 65 2c 20 62 65 63 |essary h|ere, bec|
|00000f50| 61 75 73 65 20 74 68 69 | 73 20 69 73 0d 09 2f 2f |ause thi|s is..//|
|00000f60| 20 6e 6f 74 20 61 6e 20 | 69 6e 69 74 69 61 6c 69 | not an |initiali|
|00000f70| 7a 61 74 69 6f 6e 20 6d | 65 74 68 6f 64 2e 20 49 |zation m|ethod. I|
|00000f80| 66 20 61 20 66 61 69 6c | 75 72 65 20 6f 63 63 75 |f a fail|ure occu|
|00000f90| 72 73 2c 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 |rs, the |command |
|00000fa0| 68 61 6e 64 6c 65 72 0d | 09 2f 2f 20 65 78 65 63 |handler.|.// exec|
|00000fb0| 75 74 69 6e 67 20 74 68 | 69 73 20 63 6f 6d 6d 61 |uting th|is comma|
|00000fc0| 6e 64 20 77 69 6c 6c 20 | 66 72 65 65 20 74 68 69 |nd will |free thi|
|00000fd0| 73 20 6f 62 6a 65 63 74 | 2e 0d 0d 09 2f 2f 20 53 |s object|....// S|
|00000fe0| 75 62 63 6c 61 73 73 65 | 73 20 73 68 6f 75 6c 64 |ubclasse|s should|
|00000ff0| 20 63 61 6c 6c 20 49 6e | 68 65 72 69 74 65 64 20 | call In|herited |
|00001000| 62 65 66 6f 72 65 20 64 | 6f 69 6e 67 20 74 68 65 |before d|oing the|
|00001010| 69 72 20 74 68 69 6e 67 | 2e 0d 0d 09 66 43 6c 69 |ir thing|....fCli|
|00001020| 70 41 70 70 6f 69 6e 74 | 6d 65 6e 74 73 20 3d 20 |pAppoint|ments = |
|00001030| 4e 65 77 41 70 70 6f 69 | 6e 74 6d 65 6e 74 4c 69 |NewAppoi|ntmentLi|
|00001040| 73 74 28 29 3b 0d 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |st();..}|..//----|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010a0| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|000010b0| 6d 65 6e 74 20 41 53 65 | 6c 43 6f 6d 6d 61 6e 64 |ment ASe|lCommand|
|000010c0| 0d 0d 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 45 64 |..TAppoi|ntmentEd|
|000010d0| 69 74 43 6f 6d 6d 61 6e | 64 3a 3a 54 41 70 70 6f |itComman|d::TAppo|
|000010e0| 69 6e 74 6d 65 6e 74 45 | 64 69 74 43 6f 6d 6d 61 |intmentE|ditComma|
|000010f0| 6e 64 28 43 6f 6d 6d 61 | 6e 64 4e 75 6d 62 65 72 |nd(Comma|ndNumber|
|00001100| 20 61 43 6f 6d 6d 61 6e | 64 4e 75 6d 62 65 72 2c | aComman|dNumber,|
|00001110| 20 54 53 63 68 65 64 75 | 6c 65 56 69 65 77 2a 20 | TSchedu|leView* |
|00001120| 69 74 73 56 69 65 77 2c | 0d 09 09 09 09 62 6f 6f |itsView,|.....boo|
|00001130| 6c 20 63 61 75 73 65 73 | 43 68 61 6e 67 65 2c 20 |l causes|Change, |
|00001140| 62 6f 6f 6c 20 63 68 61 | 6e 67 65 73 43 6c 69 70 |bool cha|ngesClip|
|00001150| 62 6f 61 72 64 29 20 3a | 0d 23 69 66 64 65 66 20 |board) :|.#ifdef |
|00001160| 4d 41 43 41 50 50 5f 52 | 5f 31 33 0d 09 54 43 6f |MACAPP_R|_13..TCo|
|00001170| 6d 6d 61 6e 64 28 61 43 | 6f 6d 6d 61 6e 64 4e 75 |mmand(aC|ommandNu|
|00001180| 6d 62 65 72 2c 20 66 53 | 63 68 65 64 75 6c 65 44 |mber, fS|cheduleD|
|00001190| 6f 63 75 6d 65 6e 74 2c | 20 6b 43 61 6e 55 6e 64 |ocument,| kCanUnd|
|000011a0| 6f 2c 20 63 61 75 73 65 | 73 43 68 61 6e 67 65 2c |o, cause|sChange,|
|000011b0| 20 66 53 63 68 65 64 75 | 6c 65 44 6f 63 75 6d 65 | fSchedu|leDocume|
|000011c0| 6e 74 29 2c 0d 23 65 6e | 64 69 66 0d 09 66 53 63 |nt),.#en|dif..fSc|
|000011d0| 68 65 64 75 6c 65 56 69 | 65 77 28 69 74 73 56 69 |heduleVi|ew(itsVi|
|000011e0| 65 77 29 2c 0d 09 66 53 | 63 68 65 64 75 6c 65 44 |ew),..fS|cheduleD|
|000011f0| 6f 63 75 6d 65 6e 74 28 | 69 74 73 56 69 65 77 2d |ocument(|itsView-|
|00001200| 3e 47 65 74 53 63 68 65 | 64 75 6c 65 44 6f 63 75 |>GetSche|duleDocu|
|00001210| 6d 65 6e 74 28 29 29 2c | 0d 09 66 43 6c 69 70 41 |ment()),|..fClipA|
|00001220| 70 70 6f 69 6e 74 6d 65 | 6e 74 73 28 4e 55 4c 4c |ppointme|nts(NULL|
|00001230| 29 0d 7b 0d 23 69 66 6e | 64 65 66 20 4d 41 43 41 |).{.#ifn|def MACA|
|00001240| 50 50 5f 52 5f 31 33 0d | 09 49 43 6f 6d 6d 61 6e |PP_R_13.|.IComman|
|00001250| 64 28 61 43 6f 6d 6d 61 | 6e 64 4e 75 6d 62 65 72 |d(aComma|ndNumber|
|00001260| 2c 20 66 53 63 68 65 64 | 75 6c 65 44 6f 63 75 6d |, fSched|uleDocum|
|00001270| 65 6e 74 2c 20 6b 43 61 | 6e 55 6e 64 6f 2c 20 63 |ent, kCa|nUndo, c|
|00001280| 61 75 73 65 73 43 68 61 | 6e 67 65 2c 20 66 53 63 |ausesCha|nge, fSc|
|00001290| 68 65 64 75 6c 65 44 6f | 63 75 6d 65 6e 74 29 3b |heduleDo|cument);|
|000012a0| 0d 23 65 6e 64 69 66 0d | 0d 09 2f 2f 20 54 68 69 |.#endif.|..// Thi|
|000012b0| 73 20 64 61 74 61 20 6d | 65 6d 62 65 72 20 6d 75 |s data m|ember mu|
|000012c0| 73 74 20 62 65 20 73 65 | 74 20 68 65 72 65 20 62 |st be se|t here b|
|000012d0| 65 63 61 75 73 65 20 69 | 74 20 69 73 20 6e 6f 74 |ecause i|t is not|
|000012e0| 20 70 61 73 73 65 64 20 | 61 73 20 61 20 70 61 72 | passed |as a par|
|000012f0| 61 6d 65 74 65 72 0d 09 | 2f 2f 20 74 6f 20 49 43 |ameter..|// to IC|
|00001300| 6f 6d 6d 61 6e 64 2e 0d | 09 66 43 68 61 6e 67 65 |ommand..|.fChange|
|00001310| 73 43 6c 69 70 62 6f 61 | 72 64 09 3d 20 63 68 61 |sClipboa|rd.= cha|
|00001320| 6e 67 65 73 43 6c 69 70 | 62 6f 61 72 64 3b 0d 7d |ngesClip|board;.}|
|00001330| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|00001340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 23 70 72 |--------|----.#pr|
|00001390| 61 67 6d 61 20 73 65 67 | 6d 65 6e 74 20 41 44 6f |agma seg|ment ADo|
|000013a0| 43 6f 6d 6d 61 6e 64 0d | 0d 76 6f 69 64 20 54 41 |Command.|.void TA|
|000013b0| 70 70 6f 69 6e 74 6d 65 | 6e 74 45 64 69 74 43 6f |ppointme|ntEditCo|
|000013c0| 6d 6d 61 6e 64 3a 3a 52 | 65 6d 6f 76 65 43 6c 69 |mmand::R|emoveCli|
|000013d0| 70 41 70 70 6f 69 6e 74 | 6d 65 6e 74 73 28 29 0d |pAppoint|ments().|
|000013e0| 7b 0d 09 2f 2f 20 44 65 | 6c 65 74 65 73 20 74 68 |{..// De|letes th|
|000013f0| 65 20 63 6c 69 70 20 61 | 70 70 6f 69 6e 74 6d 65 |e clip a|ppointme|
|00001400| 6e 74 73 20 66 72 6f 6d | 20 74 68 65 20 53 63 68 |nts from| the Sch|
|00001410| 65 64 75 6c 65 20 64 6f | 63 75 6d 65 6e 74 2e 0d |edule do|cument..|
|00001420| 0d 09 43 41 70 70 6f 69 | 6e 74 6d 65 6e 74 49 74 |..CAppoi|ntmentIt|
|00001430| 65 72 61 74 6f 72 20 69 | 74 65 72 28 66 43 6c 69 |erator i|ter(fCli|
|00001440| 70 41 70 70 6f 69 6e 74 | 6d 65 6e 74 73 29 3b 0d |pAppoint|ments);.|
|00001450| 09 66 6f 72 20 28 54 41 | 70 70 6f 69 6e 74 6d 65 |.for (TA|ppointme|
|00001460| 6e 74 2a 20 61 6e 41 70 | 70 6f 69 6e 74 6d 65 6e |nt* anAp|pointmen|
|00001470| 74 20 3d 20 69 74 65 72 | 2e 46 69 72 73 74 41 70 |t = iter|.FirstAp|
|00001480| 70 6f 69 6e 74 6d 65 6e | 74 28 29 3b 20 69 74 65 |pointmen|t(); ite|
|00001490| 72 2e 4d 6f 72 65 28 29 | 3b 0d 09 09 09 61 6e 41 |r.More()|;....anA|
|000014a0| 70 70 6f 69 6e 74 6d 65 | 6e 74 20 3d 20 69 74 65 |ppointme|nt = ite|
|000014b0| 72 2e 4e 65 78 74 41 70 | 70 6f 69 6e 74 6d 65 6e |r.NextAp|pointmen|
|000014c0| 74 28 29 29 0d 09 09 20 | 66 53 63 68 65 64 75 6c |t())... |fSchedul|
|000014d0| 65 44 6f 63 75 6d 65 6e | 74 2d 3e 44 65 6c 65 74 |eDocumen|t->Delet|
|000014e0| 65 41 70 70 6f 69 6e 74 | 6d 65 6e 74 28 61 6e 41 |eAppoint|ment(anA|
|000014f0| 70 70 6f 69 6e 74 6d 65 | 6e 74 29 3b 0d 7d 0d 0d |ppointme|nt);.}..|
|00001500| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00001510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 23 70 72 61 67 |--------|--.#prag|
|00001560| 6d 61 20 73 65 67 6d 65 | 6e 74 20 41 44 6f 43 6f |ma segme|nt ADoCo|
|00001570| 6d 6d 61 6e 64 0d 0d 76 | 6f 69 64 20 54 41 70 70 |mmand..v|oid TApp|
|00001580| 6f 69 6e 74 6d 65 6e 74 | 45 64 69 74 43 6f 6d 6d |ointment|EditComm|
|00001590| 61 6e 64 3a 3a 52 65 73 | 74 6f 72 65 43 6c 69 70 |and::Res|toreClip|
|000015a0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 73 28 29 0d 7b |Appointm|ents().{|
|000015b0| 0d 09 2f 2f 20 41 64 64 | 73 20 74 68 65 20 63 6c |..// Add|s the cl|
|000015c0| 69 70 20 61 70 70 6f 69 | 6e 74 6d 65 6e 74 73 20 |ip appoi|ntments |
|000015d0| 74 6f 20 74 68 65 20 53 | 63 68 65 64 75 6c 65 20 |to the S|chedule |
|000015e0| 64 6f 63 75 6d 65 6e 74 | 2e 20 44 6f 65 73 20 74 |document|. Does t|
|000015f0| 68 65 20 62 65 73 74 20 | 69 74 20 63 61 6e 0d 09 |he best |it can..|
|00001600| 2f 2f 20 74 6f 20 72 65 | 63 6f 76 65 72 20 66 72 |// to re|cover fr|
|00001610| 6f 6d 20 66 61 69 6c 75 | 72 65 73 20 74 68 61 74 |om failu|res that|
|00001620| 20 6d 61 79 20 6f 63 63 | 75 72 20 61 64 64 69 6e | may occ|ur addin|
|00001630| 67 20 61 70 70 6f 69 6e | 74 6d 65 6e 74 73 2e 0d |g appoin|tments..|
|00001640| 0d 09 66 53 63 68 65 64 | 75 6c 65 56 69 65 77 2d |..fSched|uleView-|
|00001650| 3e 53 65 74 45 6d 70 74 | 79 53 65 6c 65 63 74 69 |>SetEmpt|ySelecti|
|00001660| 6f 6e 28 6b 48 69 67 68 | 6c 69 67 68 74 29 3b 09 |on(kHigh|light);.|
|00001670| 09 2f 2f 20 63 6c 65 61 | 72 20 63 75 72 72 65 6e |.// clea|r curren|
|00001680| 74 20 73 65 6c 65 63 74 | 69 6f 6e 20 62 65 66 6f |t select|ion befo|
|00001690| 72 65 20 61 64 64 69 6e | 67 20 61 70 70 6f 69 6e |re addin|g appoin|
|000016a0| 74 6d 65 6e 74 73 2e 0d | 0d 09 54 52 59 0d 09 7b |tments..|..TRY..{|
|000016b0| 0d 09 09 7b 0d 09 09 09 | 43 41 70 70 6f 69 6e 74 |...{....|CAppoint|
|000016c0| 6d 65 6e 74 49 74 65 72 | 61 74 6f 72 20 69 74 65 |mentIter|ator ite|
|000016d0| 72 28 66 43 6c 69 70 41 | 70 70 6f 69 6e 74 6d 65 |r(fClipA|ppointme|
|000016e0| 6e 74 73 29 3b 0d 09 09 | 09 66 6f 72 20 28 54 41 |nts);...|.for (TA|
|000016f0| 70 70 6f 69 6e 74 6d 65 | 6e 74 2a 20 61 6e 41 70 |ppointme|nt* anAp|
|00001700| 70 6f 69 6e 74 6d 65 6e | 74 20 3d 20 69 74 65 72 |pointmen|t = iter|
|00001710| 2e 46 69 72 73 74 41 70 | 70 6f 69 6e 74 6d 65 6e |.FirstAp|pointmen|
|00001720| 74 28 29 3b 20 69 74 65 | 72 2e 4d 6f 72 65 28 29 |t(); ite|r.More()|
|00001730| 3b 0d 09 09 09 09 09 61 | 6e 41 70 70 6f 69 6e 74 |;......a|nAppoint|
|00001740| 6d 65 6e 74 20 3d 20 69 | 74 65 72 2e 4e 65 78 74 |ment = i|ter.Next|
|00001750| 41 70 70 6f 69 6e 74 6d | 65 6e 74 28 29 29 0d 09 |Appointm|ent())..|
|00001760| 09 09 7b 0d 09 09 09 09 | 61 6e 41 70 70 6f 69 6e |..{.....|anAppoin|
|00001770| 74 6d 65 6e 74 2d 3e 53 | 65 74 53 65 6c 65 63 74 |tment->S|etSelect|
|00001780| 28 6b 53 65 6c 65 63 74 | 29 3b 09 09 2f 2f 20 6e |(kSelect|);..// n|
|00001790| 65 77 6c 79 20 61 64 64 | 65 64 20 61 70 70 6f 69 |ewly add|ed appoi|
|000017a0| 6e 74 6d 65 6e 74 73 20 | 61 72 65 20 61 6c 77 61 |ntments |are alwa|
|000017b0| 79 73 20 73 65 6c 65 63 | 74 65 64 2e 0d 09 09 09 |ys selec|ted.....|
|000017c0| 09 66 53 63 68 65 64 75 | 6c 65 44 6f 63 75 6d 65 |.fSchedu|leDocume|
|000017d0| 6e 74 2d 3e 41 64 64 41 | 70 70 6f 69 6e 74 6d 65 |nt->AddA|ppointme|
|000017e0| 6e 74 28 61 6e 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |nt(anApp|ointment|
|000017f0| 29 3b 0d 09 09 09 7d 0d | 09 09 7d 0d 0d 09 09 66 |);....}.|..}....f|
|00001800| 53 63 68 65 64 75 6c 65 | 56 69 65 77 2d 3e 53 63 |Schedule|View->Sc|
|00001810| 72 6f 6c 6c 53 65 6c 65 | 63 74 69 6f 6e 49 6e 74 |rollSele|ctionInt|
|00001820| 6f 56 69 65 77 28 6b 52 | 65 64 72 61 77 29 3b 0d |oView(kR|edraw);.|
|00001830| 09 7d 0d 09 43 41 54 43 | 48 5f 41 4c 4c 0d 09 7b |.}..CATC|H_ALL..{|
|00001840| 0d 09 09 7b 0d 09 09 09 | 43 41 70 70 6f 69 6e 74 |...{....|CAppoint|
|00001850| 6d 65 6e 74 49 74 65 72 | 61 74 6f 72 20 69 74 65 |mentIter|ator ite|
|00001860| 72 28 66 43 6c 69 70 41 | 70 70 6f 69 6e 74 6d 65 |r(fClipA|ppointme|
|00001870| 6e 74 73 29 3b 0d 09 09 | 09 66 6f 72 20 28 54 41 |nts);...|.for (TA|
|00001880| 70 70 6f 69 6e 74 6d 65 | 6e 74 2a 20 61 6e 41 70 |ppointme|nt* anAp|
|00001890| 70 6f 69 6e 74 6d 65 6e | 74 20 3d 20 69 74 65 72 |pointmen|t = iter|
|000018a0| 2e 46 69 72 73 74 41 70 | 70 6f 69 6e 74 6d 65 6e |.FirstAp|pointmen|
|000018b0| 74 28 29 3b 20 69 74 65 | 72 2e 4d 6f 72 65 28 29 |t(); ite|r.More()|
|000018c0| 3b 0d 09 09 09 09 09 61 | 6e 41 70 70 6f 69 6e 74 |;......a|nAppoint|
|000018d0| 6d 65 6e 74 20 3d 20 69 | 74 65 72 2e 4e 65 78 74 |ment = i|ter.Next|
|000018e0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 28 29 29 0d 09 |Appointm|ent())..|
|000018f0| 09 09 09 66 53 63 68 65 | 64 75 6c 65 44 6f 63 75 |...fSche|duleDocu|
|00001900| 6d 65 6e 74 2d 3e 44 65 | 6c 65 74 65 41 70 70 6f |ment->De|leteAppo|
|00001910| 69 6e 74 6d 65 6e 74 28 | 61 6e 41 70 70 6f 69 6e |intment(|anAppoin|
|00001920| 74 6d 65 6e 74 29 3b 0d | 09 09 7d 0d 09 09 54 48 |tment);.|..}...TH|
|00001930| 52 4f 57 3b 0d 09 7d 0d | 09 45 4e 44 54 52 59 3b |ROW;..}.|.ENDTRY;|
|00001940| 0d 7d 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.}..//--|--------|
|00001950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 23 |--------|------.#|
|000019a0| 70 72 61 67 6d 61 20 73 | 65 67 6d 65 6e 74 20 41 |pragma s|egment A|
|000019b0| 44 6f 43 6f 6d 6d 61 6e | 64 0d 0d 62 6f 6f 6c 20 |DoComman|d..bool |
|000019c0| 54 41 70 70 6f 69 6e 74 | 6d 65 6e 74 45 64 69 74 |TAppoint|mentEdit|
|000019d0| 43 6f 6d 6d 61 6e 64 3a | 3a 53 68 6f 75 6c 64 46 |Command:|:ShouldF|
|000019e0| 72 65 65 43 6c 69 70 41 | 70 70 6f 69 6e 74 6d 65 |reeClipA|ppointme|
|000019f0| 6e 74 73 28 29 0d 7b 0d | 09 2f 2f 20 41 6c 6c 6f |nts().{.|.// Allo|
|00001a00| 77 73 20 73 75 62 63 6c | 61 73 73 65 73 20 74 6f |ws subcl|asses to|
|00001a10| 20 69 6e 64 69 63 61 74 | 65 20 77 68 65 74 68 65 | indicat|e whethe|
|00001a20| 72 20 74 68 65 20 63 6c | 69 70 20 61 70 70 6f 69 |r the cl|ip appoi|
|00001a30| 6e 74 6d 65 6e 74 73 0d | 09 2f 2f 20 73 68 6f 75 |ntments.|.// shou|
|00001a40| 6c 64 20 62 65 20 66 72 | 65 65 64 2e 0d 0d 09 53 |ld be fr|eed....S|
|00001a50| 75 62 43 6c 61 73 73 52 | 65 73 70 6f 6e 73 69 62 |ubClassR|esponsib|
|00001a60| 69 6c 69 74 79 28 29 3b | 0d 09 72 65 74 75 72 6e |ility();|..return|
|00001a70| 20 66 61 6c 73 65 3b 0d | 7d 0d 0d 2f 2f 2d 2d 2d | false;.|}..//---|
|00001a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ad0| 2d 2d 2d 2d 2d 0d 2f 2f | 20 43 4c 41 53 53 20 54 |-----.//| CLASS T|
|00001ae0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 43 75 74 43 6f |Appointm|entCutCo|
|00001af0| 70 79 43 6c 65 61 72 43 | 6f 6d 6d 61 6e 64 0d 2f |pyClearC|ommand./|
|00001b00| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|00001b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 23 70 72 61 67 6d |--------|-.#pragm|
|00001b60| 61 20 73 65 67 6d 65 6e | 74 20 41 44 6f 43 6f 6d |a segmen|t ADoCom|
|00001b70| 6d 61 6e 64 0d 0d 23 75 | 6e 64 65 66 20 49 6e 68 |mand..#u|ndef Inh|
|00001b80| 65 72 69 74 65 64 0d 23 | 64 65 66 69 6e 65 20 49 |erited.#|define I|
|00001b90| 6e 68 65 72 69 74 65 64 | 20 54 41 70 70 6f 69 6e |nherited| TAppoin|
|00001ba0| 74 6d 65 6e 74 45 64 69 | 74 43 6f 6d 6d 61 6e 64 |tmentEdi|tCommand|
|00001bb0| 0d 0d 76 6f 69 64 20 54 | 41 70 70 6f 69 6e 74 6d |..void T|Appointm|
|00001bc0| 65 6e 74 43 75 74 43 6f | 70 79 43 6c 65 61 72 43 |entCutCo|pyClearC|
|00001bd0| 6f 6d 6d 61 6e 64 3a 3a | 44 6f 49 74 28 29 09 2f |ommand::|DoIt()./|
|00001be0| 2f 20 4f 56 45 52 52 49 | 44 45 0d 7b 0d 09 2f 2f |/ OVERRI|DE.{..//|
|00001bf0| 20 50 72 65 70 61 72 65 | 73 20 74 6f 20 65 64 69 | Prepare|s to edi|
|00001c00| 74 20 62 79 20 67 65 74 | 74 69 6e 67 20 61 20 6c |t by get|ting a l|
|00001c10| 69 73 74 20 6f 66 20 74 | 68 65 20 63 75 72 72 65 |ist of t|he curre|
|00001c20| 6e 74 6c 79 20 73 65 6c | 65 63 74 65 64 20 61 70 |ntly sel|ected ap|
|00001c30| 70 6f 69 6e 74 6d 65 6e | 74 73 2c 0d 09 2f 2f 20 |pointmen|ts,..// |
|00001c40| 63 6f 70 79 69 6e 67 20 | 74 68 65 6d 20 74 6f 20 |copying |them to |
|00001c50| 74 68 65 20 63 6c 69 70 | 62 6f 61 72 64 20 69 66 |the clip|board if|
|00001c60| 20 6e 65 63 65 73 73 61 | 72 79 2e 0d 09 2f 2f 20 | necessa|ry...// |
|00001c70| 54 68 65 6e 20 63 61 6c | 6c 73 20 52 65 64 6f 49 |Then cal|ls RedoI|
|00001c80| 74 20 74 6f 20 64 6f 20 | 74 68 65 20 61 63 74 69 |t to do |the acti|
|00001c90| 6f 6e 20 61 70 70 72 6f | 70 72 69 61 74 65 20 66 |on appro|priate f|
|00001ca0| 6f 72 20 74 68 65 20 63 | 6f 6d 6d 61 6e 64 20 69 |or the c|ommand i|
|00001cb0| 64 65 6e 74 69 66 69 65 | 72 2e 0d 0d 09 74 68 69 |dentifie|r....thi|
|00001cc0| 73 2d 3e 47 65 74 43 6c | 69 70 41 70 70 6f 69 6e |s->GetCl|ipAppoin|
|00001cd0| 74 6d 65 6e 74 73 28 29 | 3b 09 09 09 09 2f 2f 20 |tments()|;....// |
|00001ce0| 47 65 74 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 |Get the |selected|
|00001cf0| 20 61 70 70 6f 69 6e 74 | 6d 65 6e 74 73 2e 0d 0d | appoint|ments...|
|00001d00| 09 69 66 20 28 66 49 64 | 65 6e 74 69 66 69 65 72 |.if (fId|entifier|
|00001d10| 20 21 3d 20 63 43 6c 65 | 61 72 29 09 09 09 09 09 | != cCle|ar).....|
|00001d20| 2f 2f 20 69 66 20 6e 6f | 74 20 63 6c 65 61 72 2c |// if no|t clear,|
|00001d30| 0d 09 09 74 68 69 73 2d | 3e 50 75 74 41 70 70 6f |...this-|>PutAppo|
|00001d40| 69 6e 74 6d 65 6e 74 73 | 54 6f 43 6c 69 70 28 29 |intments|ToClip()|
|00001d50| 3b 09 09 09 2f 2f 20 70 | 75 74 20 63 6c 6f 6e 65 |;...// p|ut clone|
|00001d60| 73 20 6f 66 20 74 68 65 | 20 73 65 6c 65 63 74 69 |s of the| selecti|
|00001d70| 6f 6e 20 69 6e 74 6f 20 | 74 68 65 20 63 6c 69 70 |on into |the clip|
|00001d80| 62 6f 61 72 64 0d 0d 09 | 74 68 69 73 2d 3e 52 65 |board...|this->Re|
|00001d90| 64 6f 49 74 28 29 3b 09 | 09 09 09 09 09 09 09 2f |doIt();.|......./|
|00001da0| 2f 20 44 6f 20 74 68 65 | 20 6d 61 69 6e 20 61 63 |/ Do the| main ac|
|00001db0| 74 69 6f 6e 2e 0d 7d 0d | 0d 2f 2f 2d 2d 2d 2d 2d |tion..}.|.//-----|
|00001dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001de0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e10| 2d 2d 2d 0d 23 70 72 61 | 67 6d 61 20 73 65 67 6d |---.#pra|gma segm|
|00001e20| 65 6e 74 20 41 44 6f 43 | 6f 6d 6d 61 6e 64 0d 0d |ent ADoC|ommand..|
|00001e30| 76 6f 69 64 20 54 41 70 | 70 6f 69 6e 74 6d 65 6e |void TAp|pointmen|
|00001e40| 74 43 75 74 43 6f 70 79 | 43 6c 65 61 72 43 6f 6d |tCutCopy|ClearCom|
|00001e50| 6d 61 6e 64 3a 3a 47 65 | 74 43 6c 69 70 41 70 70 |mand::Ge|tClipApp|
|00001e60| 6f 69 6e 74 6d 65 6e 74 | 73 28 29 09 09 2f 2f 20 |ointment|s()..// |
|00001e70| 4f 56 45 52 52 49 44 45 | 0d 7b 0d 09 2f 2f 20 46 |OVERRIDE|.{..// F|
|00001e80| 69 6c 6c 73 20 63 6c 69 | 70 20 6c 69 73 74 20 77 |ills cli|p list w|
|00001e90| 69 74 68 20 74 68 65 20 | 64 6f 63 75 6d 65 6e 74 |ith the |document|
|00001ea0| 27 73 20 63 75 72 72 65 | 6e 74 6c 79 20 73 65 6c |'s curre|ntly sel|
|00001eb0| 65 63 74 65 64 20 61 70 | 70 6f 69 6e 74 6d 65 6e |ected ap|pointmen|
|00001ec0| 74 73 2e 0d 0d 09 49 6e | 68 65 72 69 74 65 64 3a |ts....In|herited:|
|00001ed0| 3a 47 65 74 43 6c 69 70 | 41 70 70 6f 69 6e 74 6d |:GetClip|Appointm|
|00001ee0| 65 6e 74 73 28 29 3b 0d | 0d 09 43 53 65 6c 65 63 |ents();.|..CSelec|
|00001ef0| 74 65 64 41 70 70 6f 69 | 6e 74 6d 65 6e 74 49 74 |tedAppoi|ntmentIt|
|00001f00| 65 72 61 74 6f 72 20 69 | 74 65 72 28 66 53 63 68 |erator i|ter(fSch|
|00001f10| 65 64 75 6c 65 56 69 65 | 77 29 3b 09 09 2f 2f 20 |eduleVie|w);..// |
|00001f20| 67 65 74 20 61 70 70 6f | 69 6e 74 6d 65 6e 74 73 |get appo|intments|
|00001f30| 20 66 72 6f 6d 20 76 69 | 65 77 2e 0d 09 66 6f 72 | from vi|ew...for|
|00001f40| 20 28 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 2a 20 | (TAppoi|ntment* |
|00001f50| 61 6e 41 70 70 6f 69 6e | 74 6d 65 6e 74 20 3d 20 |anAppoin|tment = |
|00001f60| 69 74 65 72 2e 46 69 72 | 73 74 41 70 70 6f 69 6e |iter.Fir|stAppoin|
|00001f70| 74 6d 65 6e 74 28 29 3b | 20 69 74 65 72 2e 4d 6f |tment();| iter.Mo|
|00001f80| 72 65 28 29 3b 0d 09 09 | 09 61 6e 41 70 70 6f 69 |re();...|.anAppoi|
|00001f90| 6e 74 6d 65 6e 74 20 3d | 20 69 74 65 72 2e 4e 65 |ntment =| iter.Ne|
|00001fa0| 78 74 41 70 70 6f 69 6e | 74 6d 65 6e 74 28 29 29 |xtAppoin|tment())|
|00001fb0| 0d 09 09 20 66 43 6c 69 | 70 41 70 70 6f 69 6e 74 |... fCli|pAppoint|
|00001fc0| 6d 65 6e 74 73 2d 3e 49 | 6e 73 65 72 74 28 61 6e |ments->I|nsert(an|
|00001fd0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 29 3b 0d 7d 0d |Appointm|ent);.}.|
|00001fe0| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00001ff0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 23 70 72 61 |--------|---.#pra|
|00002040| 67 6d 61 20 73 65 67 6d | 65 6e 74 20 41 53 65 6c |gma segm|ent ASel|
|00002050| 43 6f 6d 6d 61 6e 64 0d | 0d 54 41 70 70 6f 69 6e |Command.|.TAppoin|
|00002060| 74 6d 65 6e 74 43 75 74 | 43 6f 70 79 43 6c 65 61 |tmentCut|CopyClea|
|00002070| 72 43 6f 6d 6d 61 6e 64 | 3a 3a 54 41 70 70 6f 69 |rCommand|::TAppoi|
|00002080| 6e 74 6d 65 6e 74 43 75 | 74 43 6f 70 79 43 6c 65 |ntmentCu|tCopyCle|
|00002090| 61 72 43 6f 6d 6d 61 6e | 64 28 43 6f 6d 6d 61 6e |arComman|d(Comman|
|000020a0| 64 4e 75 6d 62 65 72 20 | 61 43 6f 6d 6d 61 6e 64 |dNumber |aCommand|
|000020b0| 4e 75 6d 62 65 72 2c 20 | 54 53 63 68 65 64 75 6c |Number, |TSchedul|
|000020c0| 65 56 69 65 77 2a 20 69 | 74 73 56 69 65 77 29 20 |eView* i|tsView) |
|000020d0| 3a 0d 09 09 54 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |:...TApp|ointment|
|000020e0| 45 64 69 74 43 6f 6d 6d | 61 6e 64 28 61 43 6f 6d |EditComm|and(aCom|
|000020f0| 6d 61 6e 64 4e 75 6d 62 | 65 72 2c 20 69 74 73 56 |mandNumb|er, itsV|
|00002100| 69 65 77 2c 0d 09 09 61 | 43 6f 6d 6d 61 6e 64 4e |iew,...a|CommandN|
|00002110| 75 6d 62 65 72 20 21 3d | 20 63 43 6f 70 79 20 2f |umber !=| cCopy /|
|00002120| 2a 20 63 61 75 73 65 73 | 43 68 61 6e 67 65 20 2a |* causes|Change *|
|00002130| 2f 2c 20 61 43 6f 6d 6d | 61 6e 64 4e 75 6d 62 65 |/, aComm|andNumbe|
|00002140| 72 20 21 3d 20 63 43 6c | 65 61 72 20 2f 2a 20 63 |r != cCl|ear /* c|
|00002150| 68 61 6e 67 65 73 43 6c | 69 70 62 6f 61 72 64 20 |hangesCl|ipboard |
|00002160| 2a 2f 29 0d 0d 7b 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |*/)..{.}|..//----|
|00002170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021c0| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|000021d0| 6d 65 6e 74 20 41 44 6f | 43 6f 6d 6d 61 6e 64 0d |ment ADo|Command.|
|000021e0| 0d 76 6f 69 64 20 54 41 | 70 70 6f 69 6e 74 6d 65 |.void TA|ppointme|
|000021f0| 6e 74 43 75 74 43 6f 70 | 79 43 6c 65 61 72 43 6f |ntCutCop|yClearCo|
|00002200| 6d 6d 61 6e 64 3a 3a 50 | 75 74 41 70 70 6f 69 6e |mmand::P|utAppoin|
|00002210| 74 6d 65 6e 74 73 54 6f | 43 6c 69 70 28 29 0d 7b |tmentsTo|Clip().{|
|00002220| 0d 09 2f 2f 20 43 72 65 | 61 74 65 73 20 61 20 63 |..// Cre|ates a c|
|00002230| 6c 69 70 20 64 6f 63 75 | 6d 65 6e 74 20 66 69 6c |lip docu|ment fil|
|00002240| 6c 73 20 69 74 20 77 69 | 74 68 20 63 6c 6f 6e 65 |ls it wi|th clone|
|00002250| 73 20 6f 66 20 74 68 65 | 20 63 6c 69 70 20 61 70 |s of the| clip ap|
|00002260| 70 6f 69 6e 74 6d 65 6e | 74 73 2c 0d 09 2f 2f 20 |pointmen|ts,..// |
|00002270| 74 68 65 6e 20 63 72 65 | 61 74 65 73 20 61 20 63 |then cre|ates a c|
|00002280| 6c 69 70 20 76 69 65 77 | 20 74 6f 20 64 69 73 70 |lip view| to disp|
|00002290| 6c 61 79 20 74 68 65 6d | 2c 20 77 68 69 63 68 20 |lay them|, which |
|000022a0| 69 73 20 70 61 73 73 65 | 64 20 74 6f 0d 09 2f 2f |is passe|d to..//|
|000022b0| 20 4d 61 63 41 70 70 27 | 73 20 63 6c 69 70 20 6d | MacApp'|s clip m|
|000022c0| 61 6e 61 67 65 72 2e 0d | 0d 09 4d 41 56 6f 6c 61 |anager..|..MAVola|
|000022d0| 74 69 6c 65 49 6e 69 74 | 28 54 53 63 68 65 64 75 |tileInit|(TSchedu|
|000022e0| 6c 65 44 6f 63 75 6d 65 | 6e 74 2a 2c 20 63 6c 69 |leDocume|nt*, cli|
|000022f0| 70 44 6f 63 2c 20 6e 65 | 77 20 54 53 63 68 65 64 |pDoc, ne|w TSched|
|00002300| 75 6c 65 44 6f 63 75 6d | 65 6e 74 28 4e 55 4c 4c |uleDocum|ent(NULL|
|00002310| 29 29 3b 09 09 2f 2f 20 | 63 72 65 61 74 65 20 61 |));..// |create a|
|00002320| 20 63 6c 69 70 20 64 6f | 63 75 6d 65 6e 74 0d 09 | clip do|cument..|
|00002330| 09 09 09 09 09 09 2f 2f | 20 69 6e 69 74 69 61 6c |......//| initial|
|00002340| 69 7a 65 20 69 74 2e 0d | 0d 09 4d 41 56 6f 6c 61 |ize it..|..MAVola|
|00002350| 74 69 6c 65 49 6e 69 74 | 28 54 41 70 70 6f 69 6e |tileInit|(TAppoin|
|00002360| 74 6d 65 6e 74 2a 2c 20 | 63 6c 6f 6e 65 64 41 70 |tment*, |clonedAp|
|00002370| 70 6f 69 6e 74 6d 65 6e | 74 2c 20 4e 55 4c 4c 29 |pointmen|t, NULL)|
|00002380| 3b 0d 0d 09 54 52 59 0d | 09 7b 0d 09 09 7b 09 09 |;...TRY.|.{...{..|
|00002390| 09 09 09 09 09 09 09 09 | 09 09 09 2f 2f 20 65 73 |........|...// es|
|000023a0| 74 61 62 6c 69 73 68 20 | 63 6f 6e 74 65 78 74 20 |tablish |context |
|000023b0| 66 6f 72 20 43 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |for CApp|ointment|
|000023c0| 49 74 65 72 61 74 6f 72 | 0d 09 09 09 43 41 70 70 |Iterator|....CApp|
|000023d0| 6f 69 6e 74 6d 65 6e 74 | 49 74 65 72 61 74 6f 72 |ointment|Iterator|
|000023e0| 20 69 74 65 72 28 66 43 | 6c 69 70 41 70 70 6f 69 | iter(fC|lipAppoi|
|000023f0| 6e 74 6d 65 6e 74 73 29 | 3b 0d 09 09 09 66 6f 72 |ntments)|;....for|
|00002400| 20 28 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 2a 20 | (TAppoi|ntment* |
|00002410| 61 6e 41 70 70 6f 69 6e | 74 6d 65 6e 74 20 3d 20 |anAppoin|tment = |
|00002420| 69 74 65 72 2e 46 69 72 | 73 74 41 70 70 6f 69 6e |iter.Fir|stAppoin|
|00002430| 74 6d 65 6e 74 28 29 3b | 20 69 74 65 72 2e 4d 6f |tment();| iter.Mo|
|00002440| 72 65 28 29 3b 0d 09 09 | 09 09 09 61 6e 41 70 70 |re();...|...anApp|
|00002450| 6f 69 6e 74 6d 65 6e 74 | 20 3d 20 69 74 65 72 2e |ointment| = iter.|
|00002460| 4e 65 78 74 41 70 70 6f | 69 6e 74 6d 65 6e 74 28 |NextAppo|intment(|
|00002470| 29 29 0d 09 09 09 7b 0d | 09 09 09 09 63 6c 6f 6e |))....{.|....clon|
|00002480| 65 64 41 70 70 6f 69 6e | 74 6d 65 6e 74 20 3d 20 |edAppoin|tment = |
|00002490| 28 54 41 70 70 6f 69 6e | 74 6d 65 6e 74 2a 29 61 |(TAppoin|tment*)a|
|000024a0| 6e 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2d 3e 43 6c |nAppoint|ment->Cl|
|000024b0| 6f 6e 65 28 29 3b 0d 09 | 09 09 09 63 6c 6f 6e 65 |one();..|...clone|
|000024c0| 64 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2d 3e 53 65 |dAppoint|ment->Se|
|000024d0| 74 53 65 6c 65 63 74 28 | 6b 44 65 53 65 6c 65 63 |tSelect(|kDeSelec|
|000024e0| 74 29 3b 09 2f 2f 20 43 | 6c 69 70 62 6f 61 72 64 |t);.// C|lipboard|
|000024f0| 20 61 70 70 6f 69 6e 74 | 6d 65 6e 74 73 20 61 72 | appoint|ments ar|
|00002500| 65 20 6e 65 76 65 72 20 | 73 65 6c 65 63 74 65 64 |e never |selected|
|00002510| 2e 0d 09 09 09 09 63 6c | 69 70 44 6f 63 2d 3e 41 |......cl|ipDoc->A|
|00002520| 64 64 41 70 70 6f 69 6e | 74 6d 65 6e 74 28 63 6c |ddAppoin|tment(cl|
|00002530| 6f 6e 65 64 41 70 70 6f | 69 6e 74 6d 65 6e 74 29 |onedAppo|intment)|
|00002540| 3b 0d 09 09 09 09 63 6c | 6f 6e 65 64 41 70 70 6f |;.....cl|onedAppo|
|00002550| 69 6e 74 6d 65 6e 74 20 | 3d 20 4e 55 4c 4c 3b 0d |intment |= NULL;.|
|00002560| 09 09 09 7d 0d 09 09 7d | 0d 09 09 74 68 69 73 2d |...}...}|...this-|
|00002570| 3e 43 6c 61 69 6d 43 6c | 69 70 62 6f 61 72 64 28 |>ClaimCl|ipboard(|
|00002580| 63 6c 69 70 44 6f 63 2d | 3e 4d 61 6b 65 43 6c 69 |clipDoc-|>MakeCli|
|00002590| 70 62 6f 61 72 64 56 69 | 65 77 28 29 29 3b 09 2f |pboardVi|ew());./|
|000025a0| 2f 20 69 6e 73 74 61 6c | 6c 20 74 68 65 20 63 6c |/ instal|l the cl|
|000025b0| 69 70 62 6f 61 72 64 20 | 76 69 65 77 2e 0d 09 7d |ipboard |view...}|
|000025c0| 0d 09 43 41 54 43 48 5f | 41 4c 4c 0d 09 7b 0d 09 |..CATCH_|ALL..{..|
|000025d0| 09 63 6c 6f 6e 65 64 41 | 70 70 6f 69 6e 74 6d 65 |.clonedA|ppointme|
|000025e0| 6e 74 09 3d 20 28 54 41 | 70 70 6f 69 6e 74 6d 65 |nt.= (TA|ppointme|
|000025f0| 6e 74 2a 29 46 72 65 65 | 49 66 4f 62 6a 65 63 74 |nt*)Free|IfObject|
|00002600| 28 63 6c 6f 6e 65 64 41 | 70 70 6f 69 6e 74 6d 65 |(clonedA|ppointme|
|00002610| 6e 74 29 3b 0d 09 09 63 | 6c 69 70 44 6f 63 09 09 |nt);...c|lipDoc..|
|00002620| 09 09 3d 20 28 54 53 63 | 68 65 64 75 6c 65 44 6f |..= (TSc|heduleDo|
|00002630| 63 75 6d 65 6e 74 2a 29 | 46 72 65 65 49 66 4f 62 |cument*)|FreeIfOb|
|00002640| 6a 65 63 74 28 63 6c 69 | 70 44 6f 63 29 3b 0d 0d |ject(cli|pDoc);..|
|00002650| 09 09 54 48 52 4f 57 3b | 0d 09 7d 0d 09 45 4e 44 |..THROW;|..}..END|
|00002660| 54 52 59 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |TRY;.}..|//------|
|00002670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026c0| 2d 2d 0d 23 70 72 61 67 | 6d 61 20 73 65 67 6d 65 |--.#prag|ma segme|
|000026d0| 6e 74 20 41 44 6f 43 6f | 6d 6d 61 6e 64 0d 0d 76 |nt ADoCo|mmand..v|
|000026e0| 6f 69 64 20 54 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |oid TApp|ointment|
|000026f0| 43 75 74 43 6f 70 79 43 | 6c 65 61 72 43 6f 6d 6d |CutCopyC|learComm|
|00002700| 61 6e 64 3a 3a 52 65 64 | 6f 49 74 28 29 09 2f 2f |and::Red|oIt().//|
|00002710| 20 4f 56 45 52 52 49 44 | 45 0d 7b 0d 09 2f 2f 20 | OVERRID|E.{..// |
|00002720| 44 6f 65 73 20 74 68 65 | 20 63 6f 6d 6d 61 6e 64 |Does the| command|
|00002730| 27 73 20 61 63 74 69 6f | 6e 2c 20 62 61 73 65 64 |'s actio|n, based|
|00002740| 20 6f 6e 20 69 74 73 20 | 69 64 65 6e 74 69 66 69 | on its |identifi|
|00002750| 65 72 2e 0d 0d 09 69 66 | 20 28 66 49 64 65 6e 74 |er....if| (fIdent|
|00002760| 69 66 69 65 72 20 21 3d | 20 63 43 6f 70 79 29 09 |ifier !=| cCopy).|
|00002770| 09 09 2f 2f 20 69 66 20 | 63 75 74 20 6f 72 20 63 |..// if |cut or c|
|00002780| 6c 65 61 72 2c 0d 09 09 | 74 68 69 73 2d 3e 52 65 |lear,...|this->Re|
|00002790| 6d 6f 76 65 43 6c 69 70 | 41 70 70 6f 69 6e 74 6d |moveClip|Appointm|
|000027a0| 65 6e 74 73 28 29 3b 09 | 09 2f 2f 20 72 65 6d 6f |ents();.|.// remo|
|000027b0| 76 65 20 74 68 65 20 61 | 70 70 6f 69 6e 74 6d 65 |ve the a|ppointme|
|000027c0| 6e 74 73 20 66 72 6f 6d | 20 74 68 65 20 64 6f 63 |nts from| the doc|
|000027d0| 75 6d 65 6e 74 2e 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |ument..}|..//----|
|000027e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002830| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|00002840| 6d 65 6e 74 20 41 44 6f | 43 6f 6d 6d 61 6e 64 0d |ment ADo|Command.|
|00002850| 0d 62 6f 6f 6c 20 54 41 | 70 70 6f 69 6e 74 6d 65 |.bool TA|ppointme|
|00002860| 6e 74 43 75 74 43 6f 70 | 79 43 6c 65 61 72 43 6f |ntCutCop|yClearCo|
|00002870| 6d 6d 61 6e 64 3a 3a 53 | 68 6f 75 6c 64 46 72 65 |mmand::S|houldFre|
|00002880| 65 43 6c 69 70 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |eClipApp|ointment|
|00002890| 73 28 29 09 09 2f 2f 20 | 4f 56 45 52 52 49 44 45 |s()..// |OVERRIDE|
|000028a0| 0d 7b 0d 09 2f 2f 20 46 | 72 65 65 73 20 74 68 65 |.{..// F|rees the|
|000028b0| 20 61 70 70 6f 69 6e 74 | 6d 65 6e 74 73 20 69 66 | appoint|ments if|
|000028c0| 20 74 68 65 20 63 75 74 | 2c 20 6f 72 20 63 6c 65 | the cut|, or cle|
|000028d0| 61 72 20 63 6f 6d 6d 61 | 6e 64 20 77 61 73 20 64 |ar comma|nd was d|
|000028e0| 6f 6e 65 2e 0d 0d 09 72 | 65 74 75 72 6e 20 66 43 |one....r|eturn fC|
|000028f0| 6f 6d 6d 61 6e 64 44 6f | 6e 65 20 26 26 20 66 49 |ommandDo|ne && fI|
|00002900| 64 65 6e 74 69 66 69 65 | 72 20 21 3d 20 63 43 6f |dentifie|r != cCo|
|00002910| 70 79 3b 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |py;.}../|/-------|
|00002920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002970| 2d 0d 23 70 72 61 67 6d | 61 20 73 65 67 6d 65 6e |-.#pragm|a segmen|
|00002980| 74 20 41 44 6f 43 6f 6d | 6d 61 6e 64 0d 0d 76 6f |t ADoCom|mand..vo|
|00002990| 69 64 20 54 41 70 70 6f | 69 6e 74 6d 65 6e 74 43 |id TAppo|intmentC|
|000029a0| 75 74 43 6f 70 79 43 6c | 65 61 72 43 6f 6d 6d 61 |utCopyCl|earComma|
|000029b0| 6e 64 3a 3a 55 6e 64 6f | 49 74 28 29 09 09 09 09 |nd::Undo|It()....|
|000029c0| 2f 2f 20 4f 56 45 52 52 | 49 44 45 0d 7b 0d 09 2f |// OVERR|IDE.{../|
|000029d0| 2f 20 49 66 20 75 6e 64 | 6f 69 6e 67 20 61 20 63 |/ If und|oing a c|
|000029e0| 75 74 20 6f 72 20 63 6c | 65 61 72 2c 20 72 65 73 |ut or cl|ear, res|
|000029f0| 74 6f 72 65 20 74 68 65 | 20 61 70 70 6f 69 6e 74 |tore the| appoint|
|00002a00| 6d 65 6e 74 73 20 74 6f | 20 74 68 65 20 64 6f 63 |ments to| the doc|
|00002a10| 75 6d 65 6e 74 2e 0d 0d | 09 69 66 20 28 66 49 64 |ument...|.if (fId|
|00002a20| 65 6e 74 69 66 69 65 72 | 20 21 3d 20 63 43 6f 70 |entifier| != cCop|
|00002a30| 79 29 0d 09 09 74 68 69 | 73 2d 3e 52 65 73 74 6f |y)...thi|s->Resto|
|00002a40| 72 65 43 6c 69 70 41 70 | 70 6f 69 6e 74 6d 65 6e |reClipAp|pointmen|
|00002a50| 74 73 28 29 3b 0d 7d 0d | 0d 2f 2f 2d 2d 2d 2d 2d |ts();.}.|.//-----|
|00002a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ab0| 2d 2d 2d 0d 2f 2f 20 43 | 4c 41 53 53 20 54 41 70 |---.// C|LASS TAp|
|00002ac0| 70 6f 69 6e 74 6d 65 6e | 74 50 61 73 74 65 43 6f |pointmen|tPasteCo|
|00002ad0| 6d 6d 61 6e 64 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |mmand.//|--------|
|00002ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b30| 0d 23 70 72 61 67 6d 61 | 20 73 65 67 6d 65 6e 74 |.#pragma| segment|
|00002b40| 20 41 44 6f 43 6f 6d 6d | 61 6e 64 0d 0d 23 75 6e | ADoComm|and..#un|
|00002b50| 64 65 66 20 49 6e 68 65 | 72 69 74 65 64 0d 23 64 |def Inhe|rited.#d|
|00002b60| 65 66 69 6e 65 20 49 6e | 68 65 72 69 74 65 64 20 |efine In|herited |
|00002b70| 54 41 70 70 6f 69 6e 74 | 6d 65 6e 74 45 64 69 74 |TAppoint|mentEdit|
|00002b80| 43 6f 6d 6d 61 6e 64 0d | 0d 76 6f 69 64 20 54 41 |Command.|.void TA|
|00002b90| 70 70 6f 69 6e 74 6d 65 | 6e 74 50 61 73 74 65 43 |ppointme|ntPasteC|
|00002ba0| 6f 6d 6d 61 6e 64 3a 3a | 44 6f 49 74 28 29 09 09 |ommand::|DoIt()..|
|00002bb0| 2f 2f 20 4f 56 45 52 52 | 49 44 45 0d 7b 0d 09 2f |// OVERR|IDE.{../|
|00002bc0| 2f 20 50 72 65 70 61 72 | 65 73 20 74 6f 20 70 61 |/ Prepar|es to pa|
|00002bd0| 73 74 65 2c 20 74 68 65 | 6e 20 63 61 6c 6c 73 20 |ste, the|n calls |
|00002be0| 52 65 64 6f 49 74 20 74 | 6f 20 74 61 6b 65 20 74 |RedoIt t|o take t|
|00002bf0| 68 65 20 61 63 74 69 6f | 6e 2e 0d 0d 09 74 68 69 |he actio|n....thi|
|00002c00| 73 2d 3e 47 65 74 43 6c | 69 70 41 70 70 6f 69 6e |s->GetCl|ipAppoin|
|00002c10| 74 6d 65 6e 74 73 28 29 | 3b 09 09 09 09 09 2f 2f |tments()|;.....//|
|00002c20| 20 67 65 74 20 61 70 70 | 6f 69 6e 74 6d 65 6e 74 | get app|ointment|
|00002c30| 73 20 74 6f 20 70 61 73 | 74 65 0d 09 74 68 69 73 |s to pas|te..this|
|00002c40| 2d 3e 52 65 64 6f 49 74 | 28 29 3b 09 09 09 09 09 |->RedoIt|();.....|
|00002c50| 09 09 09 09 2f 2f 20 64 | 6f 20 74 68 65 20 70 61 |....// d|o the pa|
|00002c60| 73 74 65 2e 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |ste..}..|//------|
|00002c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cc0| 2d 2d 0d 23 70 72 61 67 | 6d 61 20 73 65 67 6d 65 |--.#prag|ma segme|
|00002cd0| 6e 74 20 41 44 6f 43 6f | 6d 6d 61 6e 64 0d 0d 76 |nt ADoCo|mmand..v|
|00002ce0| 6f 69 64 20 54 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |oid TApp|ointment|
|00002cf0| 50 61 73 74 65 43 6f 6d | 6d 61 6e 64 3a 3a 47 65 |PasteCom|mand::Ge|
|00002d00| 74 43 6c 69 70 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |tClipApp|ointment|
|00002d10| 73 28 29 09 09 09 2f 2f | 20 4f 56 45 52 52 49 44 |s()...//| OVERRID|
|00002d20| 45 0d 7b 0d 09 2f 2f 20 | 46 69 6c 6c 73 20 6c 69 |E.{..// |Fills li|
|00002d30| 73 74 20 6f 66 20 61 70 | 70 6f 69 6e 74 6d 65 6e |st of ap|pointmen|
|00002d40| 74 73 20 74 6f 20 70 61 | 73 74 65 0d 09 2f 2f 20 |ts to pa|ste..// |
|00002d50| 77 69 74 68 20 63 6c 6f | 6e 65 73 20 6f 66 20 74 |with clo|nes of t|
|00002d60| 68 6f 73 65 20 69 6e 20 | 74 68 65 20 63 6c 69 70 |hose in |the clip|
|00002d70| 62 6f 61 72 64 2e 0d 0d | 09 49 6e 68 65 72 69 74 |board...|.Inherit|
|00002d80| 65 64 3a 3a 47 65 74 43 | 6c 69 70 41 70 70 6f 69 |ed::GetC|lipAppoi|
|00002d90| 6e 74 6d 65 6e 74 73 28 | 29 3b 0d 0d 09 4d 41 56 |ntments(|);...MAV|
|00002da0| 6f 6c 61 74 69 6c 65 49 | 6e 69 74 28 54 41 70 70 |olatileI|nit(TApp|
|00002db0| 6f 69 6e 74 6d 65 6e 74 | 2a 2c 20 63 6c 6f 6e 65 |ointment|*, clone|
|00002dc0| 64 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2c 20 4e 55 |dAppoint|ment, NU|
|00002dd0| 4c 4c 29 3b 0d 0d 09 54 | 52 59 0d 09 7b 0d 09 09 |LL);...T|RY..{...|
|00002de0| 7b 09 09 09 09 09 09 09 | 09 09 09 2f 2f 20 65 73 |{.......|...// es|
|00002df0| 74 61 62 6c 69 73 68 20 | 63 6f 6e 74 65 78 74 20 |tablish |context |
|00002e00| 66 6f 72 20 43 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |for CApp|ointment|
|00002e10| 49 74 65 72 61 74 6f 72 | 0d 09 09 09 43 41 70 70 |Iterator|....CApp|
|00002e20| 6f 69 6e 74 6d 65 6e 74 | 49 74 65 72 61 74 6f 72 |ointment|Iterator|
|00002e30| 20 69 74 65 72 28 28 54 | 53 63 68 65 64 75 6c 65 | iter((T|Schedule|
|00002e40| 44 6f 63 75 6d 65 6e 74 | 2a 29 67 43 6c 69 70 62 |Document|*)gClipb|
|00002e50| 6f 61 72 64 4d 67 72 2d | 3e 66 43 6c 69 70 56 69 |oardMgr-|>fClipVi|
|00002e60| 65 77 2d 3e 66 44 6f 63 | 75 6d 65 6e 74 29 3b 0d |ew->fDoc|ument);.|
|00002e70| 09 09 09 66 6f 72 20 28 | 54 41 70 70 6f 69 6e 74 |...for (|TAppoint|
|00002e80| 6d 65 6e 74 2a 20 61 6e | 41 70 70 6f 69 6e 74 6d |ment* an|Appointm|
|00002e90| 65 6e 74 20 3d 20 69 74 | 65 72 2e 46 69 72 73 74 |ent = it|er.First|
|00002ea0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 28 29 3b 20 69 |Appointm|ent(); i|
|00002eb0| 74 65 72 2e 4d 6f 72 65 | 28 29 3b 0d 09 09 09 09 |ter.More|();.....|
|00002ec0| 09 61 6e 41 70 70 6f 69 | 6e 74 6d 65 6e 74 20 3d |.anAppoi|ntment =|
|00002ed0| 20 69 74 65 72 2e 4e 65 | 78 74 41 70 70 6f 69 6e | iter.Ne|xtAppoin|
|00002ee0| 74 6d 65 6e 74 28 29 29 | 0d 09 09 09 7b 0d 09 09 |tment())|....{...|
|00002ef0| 09 09 63 6c 6f 6e 65 64 | 41 70 70 6f 69 6e 74 6d |..cloned|Appointm|
|00002f00| 65 6e 74 20 3d 20 28 54 | 41 70 70 6f 69 6e 74 6d |ent = (T|Appointm|
|00002f10| 65 6e 74 2a 29 61 6e 41 | 70 70 6f 69 6e 74 6d 65 |ent*)anA|ppointme|
|00002f20| 6e 74 2d 3e 43 6c 6f 6e | 65 28 29 3b 0d 09 09 09 |nt->Clon|e();....|
|00002f30| 09 66 43 6c 69 70 41 70 | 70 6f 69 6e 74 6d 65 6e |.fClipAp|pointmen|
|00002f40| 74 73 2d 3e 49 6e 73 65 | 72 74 28 63 6c 6f 6e 65 |ts->Inse|rt(clone|
|00002f50| 64 41 70 70 6f 69 6e 74 | 6d 65 6e 74 29 3b 0d 09 |dAppoint|ment);..|
|00002f60| 09 09 09 63 6c 6f 6e 65 | 64 41 70 70 6f 69 6e 74 |...clone|dAppoint|
|00002f70| 6d 65 6e 74 20 3d 20 4e | 55 4c 4c 3b 0d 09 09 09 |ment = N|ULL;....|
|00002f80| 7d 0d 09 09 7d 0d 09 7d | 0d 09 43 41 54 43 48 5f |}...}..}|..CATCH_|
|00002f90| 41 4c 4c 0d 09 7b 0d 09 | 09 63 6c 6f 6e 65 64 41 |ALL..{..|.clonedA|
|00002fa0| 70 70 6f 69 6e 74 6d 65 | 6e 74 20 3d 20 28 54 41 |ppointme|nt = (TA|
|00002fb0| 70 70 6f 69 6e 74 6d 65 | 6e 74 2a 29 46 72 65 65 |ppointme|nt*)Free|
|00002fc0| 49 66 4f 62 6a 65 63 74 | 28 63 6c 6f 6e 65 64 41 |IfObject|(clonedA|
|00002fd0| 70 70 6f 69 6e 74 6d 65 | 6e 74 29 3b 0d 09 09 54 |ppointme|nt);...T|
|00002fe0| 48 52 4f 57 3b 0d 09 7d | 0d 09 45 4e 44 54 52 59 |HROW;..}|..ENDTRY|
|00002ff0| 3b 0d 7d 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;.}..//-|--------|
|00003000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003050| 23 70 72 61 67 6d 61 20 | 73 65 67 6d 65 6e 74 20 |#pragma |segment |
|00003060| 41 53 65 6c 43 6f 6d 6d | 61 6e 64 0d 0d 54 41 70 |ASelComm|and..TAp|
|00003070| 70 6f 69 6e 74 6d 65 6e | 74 50 61 73 74 65 43 6f |pointmen|tPasteCo|
|00003080| 6d 6d 61 6e 64 3a 3a 54 | 41 70 70 6f 69 6e 74 6d |mmand::T|Appointm|
|00003090| 65 6e 74 50 61 73 74 65 | 43 6f 6d 6d 61 6e 64 28 |entPaste|Command(|
|000030a0| 43 6f 6d 6d 61 6e 64 4e | 75 6d 62 65 72 20 61 43 |CommandN|umber aC|
|000030b0| 6f 6d 6d 61 6e 64 4e 75 | 6d 62 65 72 2c 20 54 53 |ommandNu|mber, TS|
|000030c0| 63 68 65 64 75 6c 65 56 | 69 65 77 2a 20 69 74 73 |cheduleV|iew* its|
|000030d0| 56 69 65 77 29 20 3a 0d | 09 09 54 41 70 70 6f 69 |View) :.|..TAppoi|
|000030e0| 6e 74 6d 65 6e 74 45 64 | 69 74 43 6f 6d 6d 61 6e |ntmentEd|itComman|
|000030f0| 64 28 61 43 6f 6d 6d 61 | 6e 64 4e 75 6d 62 65 72 |d(aComma|ndNumber|
|00003100| 2c 20 69 74 73 56 69 65 | 77 2c 0d 09 09 74 72 75 |, itsVie|w,...tru|
|00003110| 65 20 2f 2a 20 63 61 75 | 73 65 73 43 68 61 6e 67 |e /* cau|sesChang|
|00003120| 65 20 2a 2f 2c 20 66 61 | 6c 73 65 20 2f 2a 20 63 |e */, fa|lse /* c|
|00003130| 68 61 6e 67 65 73 43 6c | 69 70 20 2a 2f 29 0d 7b |hangesCl|ip */).{|
|00003140| 0d 09 2f 2f 20 50 61 73 | 73 65 73 20 70 72 6f 70 |..// Pas|ses prop|
|00003150| 65 72 20 70 61 73 74 69 | 6e 67 20 63 6f 6d 6d 61 |er pasti|ng comma|
|00003160| 6e 64 20 70 61 72 61 6d | 65 74 65 72 73 20 74 6f |nd param|eters to|
|00003170| 20 62 61 73 65 20 63 6c | 61 73 73 0d 0d 7d 0d 0d | base cl|ass..}..|
|00003180| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00003190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 23 70 72 61 67 |--------|--.#prag|
|000031e0| 6d 61 20 73 65 67 6d 65 | 6e 74 20 41 44 6f 43 6f |ma segme|nt ADoCo|
|000031f0| 6d 6d 61 6e 64 0d 0d 76 | 6f 69 64 20 54 41 70 70 |mmand..v|oid TApp|
|00003200| 6f 69 6e 74 6d 65 6e 74 | 50 61 73 74 65 43 6f 6d |ointment|PasteCom|
|00003210| 6d 61 6e 64 3a 3a 52 65 | 64 6f 49 74 28 29 09 09 |mand::Re|doIt()..|
|00003220| 2f 2f 20 4f 56 45 52 52 | 49 44 45 0d 7b 0d 09 2f |// OVERR|IDE.{../|
|00003230| 2f 20 41 64 64 73 20 61 | 70 70 6f 69 6e 74 6d 65 |/ Adds a|ppointme|
|00003240| 6e 74 73 20 63 6c 6f 6e | 65 64 20 66 72 6f 6d 20 |nts clon|ed from |
|00003250| 74 68 65 20 63 6c 69 70 | 62 6f 61 72 64 20 74 6f |the clip|board to|
|00003260| 20 74 68 65 20 64 6f 63 | 75 6d 65 6e 74 2e 0d 0d | the doc|ument...|
|00003270| 09 74 68 69 73 2d 3e 52 | 65 73 74 6f 72 65 43 6c |.this->R|estoreCl|
|00003280| 69 70 41 70 70 6f 69 6e | 74 6d 65 6e 74 73 28 29 |ipAppoin|tments()|
|00003290| 3b 0d 7d 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;.}..//-|--------|
|000032a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000032f0| 23 70 72 61 67 6d 61 20 | 73 65 67 6d 65 6e 74 20 |#pragma |segment |
|00003300| 41 44 6f 43 6f 6d 6d 61 | 6e 64 0d 0d 62 6f 6f 6c |ADoComma|nd..bool|
|00003310| 20 54 41 70 70 6f 69 6e | 74 6d 65 6e 74 50 61 73 | TAppoin|tmentPas|
|00003320| 74 65 43 6f 6d 6d 61 6e | 64 3a 3a 53 68 6f 75 6c |teComman|d::Shoul|
|00003330| 64 46 72 65 65 43 6c 69 | 70 41 70 70 6f 69 6e 74 |dFreeCli|pAppoint|
|00003340| 6d 65 6e 74 73 28 29 09 | 09 2f 2f 20 4f 56 45 52 |ments().|.// OVER|
|00003350| 52 49 44 45 0d 7b 0d 09 | 2f 2f 20 49 66 20 64 69 |RIDE.{..|// If di|
|00003360| 64 6e 27 74 20 70 61 73 | 74 65 2c 20 66 72 65 65 |dn't pas|te, free|
|00003370| 20 74 68 65 20 61 70 70 | 6f 69 6e 74 6d 65 6e 74 | the app|ointment|
|00003380| 73 20 69 6e 20 74 68 65 | 20 6c 69 73 74 2e 0d 0d |s in the| list...|
|00003390| 09 72 65 74 75 72 6e 20 | 21 66 43 6f 6d 6d 61 6e |.return |!fComman|
|000033a0| 64 44 6f 6e 65 3b 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |dDone;.}|..//----|
|000033b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003400| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|00003410| 6d 65 6e 74 20 41 44 6f | 43 6f 6d 6d 61 6e 64 0d |ment ADo|Command.|
|00003420| 0d 76 6f 69 64 20 54 41 | 70 70 6f 69 6e 74 6d 65 |.void TA|ppointme|
|00003430| 6e 74 50 61 73 74 65 43 | 6f 6d 6d 61 6e 64 3a 3a |ntPasteC|ommand::|
|00003440| 55 6e 64 6f 49 74 28 29 | 09 09 09 09 2f 2f 20 4f |UndoIt()|....// O|
|00003450| 56 45 52 52 49 44 45 0d | 7b 0d 09 2f 2f 20 52 65 |VERRIDE.|{..// Re|
|00003460| 6d 6f 76 65 73 20 70 61 | 73 74 65 64 20 61 70 70 |moves pa|sted app|
|00003470| 6f 69 6e 74 6d 65 6e 74 | 73 2e 0d 0d 09 74 68 69 |ointment|s....thi|
|00003480| 73 2d 3e 52 65 6d 6f 76 | 65 43 6c 69 70 41 70 70 |s->Remov|eClipApp|
|00003490| 6f 69 6e 74 6d 65 6e 74 | 73 28 29 3b 0d 7d 0d 0d |ointment|s();.}..|
|000034a0| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|000034b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 43 4c |--------|--.// CL|
|00003500| 41 53 53 20 54 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |ASS TApp|ointment|
|00003510| 41 64 64 65 72 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |Adder.//|--------|
|00003520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003570| 0d 23 70 72 61 67 6d 61 | 20 73 65 67 6d 65 6e 74 |.#pragma| segment|
|00003580| 20 41 44 6f 43 6f 6d 6d | 61 6e 64 0d 0d 23 75 6e | ADoComm|and..#un|
|00003590| 64 65 66 20 49 6e 68 65 | 72 69 74 65 64 0d 23 64 |def Inhe|rited.#d|
|000035a0| 65 66 69 6e 65 20 49 6e | 68 65 72 69 74 65 64 20 |efine In|herited |
|000035b0| 54 43 6f 6d 6d 61 6e 64 | 0d 0d 76 6f 69 64 20 54 |TCommand|..void T|
|000035c0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 41 64 64 65 72 |Appointm|entAdder|
|000035d0| 3a 3a 44 6f 49 74 28 29 | 09 09 2f 2f 20 4f 56 45 |::DoIt()|..// OVE|
|000035e0| 52 52 49 44 45 0d 7b 0d | 09 2f 2f 20 50 72 65 70 |RRIDE.{.|.// Prep|
|000035f0| 61 72 65 73 20 74 6f 20 | 64 6f 20 74 68 65 20 61 |ares to |do the a|
|00003600| 64 64 69 74 69 6f 6e 20 | 62 79 20 63 72 65 61 74 |ddition |by creat|
|00003610| 69 6e 67 20 74 68 65 20 | 6e 65 77 20 61 70 70 6f |ing the |new appo|
|00003620| 69 6e 74 6d 65 6e 74 0d | 09 2f 2f 20 66 72 6f 6d |intment.|.// from|
|00003630| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 69 6e 20 | informa|tion in |
|00003640| 74 68 65 20 64 61 74 61 | 20 6d 65 6d 62 65 72 73 |the data| members|
|00003650| 2c 20 74 68 65 6e 20 63 | 61 6c 6c 73 20 52 65 64 |, then c|alls Red|
|00003660| 6f 49 74 20 74 6f 20 61 | 64 64 20 74 68 65 0d 09 |oIt to a|dd the..|
|00003670| 2f 2f 20 61 70 70 6f 69 | 6e 74 6d 65 6e 74 2e 20 |// appoi|ntment. |
|00003680| 49 74 20 69 73 20 62 65 | 74 74 65 72 20 74 6f 20 |It is be|tter to |
|00003690| 61 6c 6c 6f 63 61 74 65 | 20 6d 65 6d 6f 72 79 20 |allocate| memory |
|000036a0| 69 6e 20 74 68 65 20 44 | 6f 49 74 20 6d 65 74 68 |in the D|oIt meth|
|000036b0| 6f 64 0d 09 2f 2f 20 74 | 68 61 6e 20 69 6e 20 74 |od..// t|han in t|
|000036c0| 68 65 20 49 41 70 70 6f | 69 6e 74 6d 65 6e 74 41 |he IAppo|intmentA|
|000036d0| 64 64 65 72 20 6d 65 74 | 68 6f 64 2c 20 62 65 63 |dder met|hod, bec|
|000036e0| 61 75 73 65 20 74 68 65 | 72 65 20 69 73 20 6d 6f |ause the|re is mo|
|000036f0| 72 65 20 66 72 65 65 20 | 6d 65 6d 6f 72 79 0d 09 |re free |memory..|
|00003700| 2f 2f 20 61 72 6f 75 6e | 64 20 77 68 65 6e 20 74 |// aroun|d when t|
|00003710| 68 65 20 63 6f 6d 6d 61 | 6e 64 20 69 73 20 64 6f |he comma|nd is do|
|00003720| 6e 65 20 74 68 61 6e 20 | 77 68 65 6e 20 69 74 20 |ne than |when it |
|00003730| 69 73 20 69 6e 69 74 69 | 61 6c 69 7a 65 64 2e 0d |is initi|alized..|
|00003740| 0d 09 66 41 70 70 6f 69 | 6e 74 6d 65 6e 74 20 3d |..fAppoi|ntment =|
|00003750| 20 54 48 5f 6e 65 77 20 | 54 41 70 70 6f 69 6e 74 | TH_new |TAppoint|
|00003760| 6d 65 6e 74 28 66 44 61 | 79 2c 20 66 54 69 6d 65 |ment(fDa|y, fTime|
|00003770| 2c 20 66 44 75 72 61 74 | 69 6f 6e 2c 20 66 44 65 |, fDurat|ion, fDe|
|00003780| 73 63 72 69 70 74 69 6f | 6e 29 3b 09 09 2f 2f 20 |scriptio|n);..// |
|00003790| 63 72 65 61 74 65 20 74 | 68 65 20 6e 65 77 20 61 |create t|he new a|
|000037a0| 70 70 6f 69 6e 74 6d 65 | 6e 74 0d 0d 09 0d 09 74 |ppointme|nt.....t|
|000037b0| 68 69 73 2d 3e 52 65 64 | 6f 49 74 28 29 3b 09 09 |his->Red|oIt();..|
|000037c0| 09 09 09 09 09 2f 2f 20 | 61 64 64 20 69 74 20 74 |.....// |add it t|
|000037d0| 6f 20 74 68 65 20 64 6f | 63 75 6d 65 6e 74 2e 0d |o the do|cument..|
|000037e0| 7d 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..//---|--------|
|000037f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 23 70 |--------|-----.#p|
|00003840| 72 61 67 6d 61 20 73 65 | 67 6d 65 6e 74 20 41 44 |ragma se|gment AD|
|00003850| 6f 43 6f 6d 6d 61 6e 64 | 0d 0d 54 41 70 70 6f 69 |oCommand|..TAppoi|
|00003860| 6e 74 6d 65 6e 74 41 64 | 64 65 72 3a 3a 7e 54 41 |ntmentAd|der::~TA|
|00003870| 70 70 6f 69 6e 74 6d 65 | 6e 74 41 64 64 65 72 28 |ppointme|ntAdder(|
|00003880| 29 09 09 2f 2f 20 4f 56 | 45 52 52 49 44 45 0d 7b |)..// OV|ERRIDE.{|
|00003890| 0d 09 2f 2f 20 46 72 65 | 65 73 20 74 68 65 20 61 |..// Fre|es the a|
|000038a0| 70 70 6f 69 6e 74 6d 65 | 6e 74 2c 20 69 66 20 6e |ppointme|nt, if n|
|000038b0| 65 63 65 73 73 61 72 79 | 2e 0d 0d 09 2f 2f 20 21 |ecessary|....// !|
|000038c0| 21 21 20 54 65 73 74 20 | 69 66 20 66 41 70 70 6f |!! Test |if fAppo|
|000038d0| 69 6e 74 6d 65 6e 74 20 | 62 65 6c 6f 6e 67 73 20 |intment |belongs |
|000038e0| 74 6f 20 66 53 63 68 65 | 64 75 6c 65 44 6f 63 75 |to fSche|duleDocu|
|000038f0| 6d 65 6e 74 2c 20 69 66 | 20 6e 6f 74 2c 20 77 65 |ment, if| not, we|
|00003900| 20 73 74 69 6c 6c 20 6f | 77 6e 20 69 74 2e 0d 09 | still o|wn it...|
|00003910| 2f 2f 20 4d 75 6c 74 69 | 70 6c 65 2d 6c 65 76 65 |// Multi|ple-leve|
|00003920| 6c 20 75 6e 64 6f 20 63 | 61 75 73 65 73 20 75 73 |l undo c|auses us|
|00003930| 20 74 6f 20 6c 65 61 6b | 20 68 65 72 65 20 61 74 | to leak| here at|
|00003940| 20 61 70 70 20 71 75 69 | 74 20 74 69 6d 65 2e 0d | app qui|t time..|
|00003950| 09 69 66 20 28 21 66 43 | 6f 6d 6d 61 6e 64 44 6f |.if (!fC|ommandDo|
|00003960| 6e 65 29 0d 09 09 66 41 | 70 70 6f 69 6e 74 6d 65 |ne)...fA|ppointme|
|00003970| 6e 74 20 3d 20 28 54 41 | 70 70 6f 69 6e 74 6d 65 |nt = (TA|ppointme|
|00003980| 6e 74 2a 29 46 72 65 65 | 49 66 4f 62 6a 65 63 74 |nt*)Free|IfObject|
|00003990| 28 66 41 70 70 6f 69 6e | 74 6d 65 6e 74 29 3b 09 |(fAppoin|tment);.|
|000039a0| 2f 2f 20 69 66 20 74 68 | 65 20 63 6f 6d 6d 61 6e |// if th|e comman|
|000039b0| 64 20 77 61 73 20 6e 6f | 74 20 64 6f 6e 65 2c 20 |d was no|t done, |
|000039c0| 77 65 20 73 74 69 6c 6c | 20 6f 77 6e 20 74 68 65 |we still| own the|
|000039d0| 20 61 70 70 6f 69 6e 74 | 6d 65 6e 74 2e 0d 7d 0d | appoint|ment..}.|
|000039e0| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|000039f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 23 70 72 61 |--------|---.#pra|
|00003a40| 67 6d 61 20 73 65 67 6d | 65 6e 74 20 41 53 65 6c |gma segm|ent ASel|
|00003a50| 43 6f 6d 6d 61 6e 64 0d | 0d 54 41 70 70 6f 69 6e |Command.|.TAppoin|
|00003a60| 74 6d 65 6e 74 41 64 64 | 65 72 3a 3a 54 41 70 70 |tmentAdd|er::TApp|
|00003a70| 6f 69 6e 74 6d 65 6e 74 | 41 64 64 65 72 28 43 6f |ointment|Adder(Co|
|00003a80| 6d 6d 61 6e 64 4e 75 6d | 62 65 72 20 61 43 6f 6d |mmandNum|ber aCom|
|00003a90| 6d 61 6e 64 4e 75 6d 62 | 65 72 2c 20 54 53 63 68 |mandNumb|er, TSch|
|00003aa0| 65 64 75 6c 65 56 69 65 | 77 2a 20 69 74 73 56 69 |eduleVie|w* itsVi|
|00003ab0| 65 77 2c 0d 09 09 09 09 | 09 44 61 79 49 6e 64 65 |ew,.....|.DayInde|
|00003ac0| 78 20 69 74 73 44 61 79 | 2c 20 54 69 6d 65 49 6e |x itsDay|, TimeIn|
|00003ad0| 64 65 78 20 69 74 73 54 | 69 6d 65 2c 20 54 69 6d |dex itsT|ime, Tim|
|00003ae0| 65 49 6e 64 65 78 20 69 | 74 73 44 75 72 61 74 69 |eIndex i|tsDurati|
|00003af0| 6f 6e 2c 0d 09 09 09 09 | 09 43 53 74 72 32 35 35 |on,.....|.CStr255|
|00003b00| 26 20 69 74 73 44 65 73 | 63 72 69 70 74 69 6f 6e |& itsDes|cription|
|00003b10| 29 20 3a 0d 23 69 66 64 | 65 66 20 4d 41 43 41 50 |) :.#ifd|ef MACAP|
|00003b20| 50 5f 52 5f 31 33 0d 09 | 54 43 6f 6d 6d 61 6e 64 |P_R_13..|TCommand|
|00003b30| 28 61 43 6f 6d 6d 61 6e | 64 4e 75 6d 62 65 72 2c |(aComman|dNumber,|
|00003b40| 20 69 74 73 56 69 65 77 | 2d 3e 47 65 74 53 63 68 | itsView|->GetSch|
|00003b50| 65 64 75 6c 65 44 6f 63 | 75 6d 65 6e 74 28 29 2c |eduleDoc|ument(),|
|00003b60| 20 6b 43 61 6e 55 6e 64 | 6f 2c 20 6b 43 61 75 73 | kCanUnd|o, kCaus|
|00003b70| 65 73 43 68 61 6e 67 65 | 2c 20 69 74 73 56 69 65 |esChange|, itsVie|
|00003b80| 77 2d 3e 47 65 74 53 63 | 68 65 64 75 6c 65 44 6f |w->GetSc|heduleDo|
|00003b90| 63 75 6d 65 6e 74 28 29 | 29 2c 0d 23 65 6e 64 69 |cument()|),.#endi|
|00003ba0| 66 0d 09 66 53 63 68 65 | 64 75 6c 65 56 69 65 77 |f..fSche|duleView|
|00003bb0| 28 69 74 73 56 69 65 77 | 29 2c 0d 09 66 53 63 68 |(itsView|),..fSch|
|00003bc0| 65 64 75 6c 65 44 6f 63 | 75 6d 65 6e 74 28 69 74 |eduleDoc|ument(it|
|00003bd0| 73 56 69 65 77 2d 3e 47 | 65 74 53 63 68 65 64 75 |sView->G|etSchedu|
|00003be0| 6c 65 44 6f 63 75 6d 65 | 6e 74 28 29 29 2c 0d 09 |leDocume|nt()),..|
|00003bf0| 66 41 70 70 6f 69 6e 74 | 6d 65 6e 74 28 4e 55 4c |fAppoint|ment(NUL|
|00003c00| 4c 29 2c 0d 09 66 44 61 | 79 28 69 74 73 44 61 79 |L),..fDa|y(itsDay|
|00003c10| 29 2c 0d 09 66 54 69 6d | 65 28 69 74 73 54 69 6d |),..fTim|e(itsTim|
|00003c20| 65 29 2c 0d 09 66 44 75 | 72 61 74 69 6f 6e 28 69 |e),..fDu|ration(i|
|00003c30| 74 73 44 75 72 61 74 69 | 6f 6e 29 2c 0d 09 66 44 |tsDurati|on),..fD|
|00003c40| 65 73 63 72 69 70 74 69 | 6f 6e 28 69 74 73 44 65 |escripti|on(itsDe|
|00003c50| 73 63 72 69 70 74 69 6f | 6e 29 0d 7b 0d 23 69 66 |scriptio|n).{.#if|
|00003c60| 6e 64 65 66 20 4d 41 43 | 41 50 50 5f 52 5f 31 33 |ndef MAC|APP_R_13|
|00003c70| 0d 09 49 43 6f 6d 6d 61 | 6e 64 28 61 43 6f 6d 6d |..IComma|nd(aComm|
|00003c80| 61 6e 64 4e 75 6d 62 65 | 72 2c 20 69 74 73 56 69 |andNumbe|r, itsVi|
|00003c90| 65 77 2d 3e 47 65 74 53 | 63 68 65 64 75 6c 65 44 |ew->GetS|cheduleD|
|00003ca0| 6f 63 75 6d 65 6e 74 28 | 29 2c 20 6b 43 61 6e 55 |ocument(|), kCanU|
|00003cb0| 6e 64 6f 2c 20 6b 43 61 | 75 73 65 73 43 68 61 6e |ndo, kCa|usesChan|
|00003cc0| 67 65 2c 20 69 74 73 56 | 69 65 77 2d 3e 47 65 74 |ge, itsV|iew->Get|
|00003cd0| 53 63 68 65 64 75 6c 65 | 44 6f 63 75 6d 65 6e 74 |Schedule|Document|
|00003ce0| 28 29 29 3b 0d 23 65 6e | 64 69 66 0d 7d 0d 0d 2f |());.#en|dif.}../|
|00003cf0| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|00003d00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 23 70 72 61 67 6d |--------|-.#pragm|
|00003d50| 61 20 73 65 67 6d 65 6e | 74 20 41 44 6f 43 6f 6d |a segmen|t ADoCom|
|00003d60| 6d 61 6e 64 0d 0d 76 6f | 69 64 20 54 41 70 70 6f |mand..vo|id TAppo|
|00003d70| 69 6e 74 6d 65 6e 74 41 | 64 64 65 72 3a 3a 52 65 |intmentA|dder::Re|
|00003d80| 64 6f 49 74 28 29 09 09 | 2f 2f 20 4f 56 45 52 52 |doIt()..|// OVERR|
|00003d90| 49 44 45 0d 7b 0d 09 2f | 2f 20 41 63 74 75 61 6c |IDE.{../|/ Actual|
|00003da0| 6c 79 20 61 64 64 73 20 | 74 68 65 20 61 70 70 6f |ly adds |the appo|
|00003db0| 69 6e 74 6d 65 6e 74 20 | 74 6f 20 74 68 65 20 64 |intment |to the d|
|00003dc0| 6f 63 75 6d 65 6e 74 2e | 0d 0d 09 2f 2f 20 43 6c |ocument.|...// Cl|
|00003dd0| 65 61 72 20 65 78 69 73 | 74 69 6e 67 20 73 65 6c |ear exis|ting sel|
|00003de0| 65 63 74 69 6f 6e 20 62 | 65 66 6f 72 65 20 61 64 |ection b|efore ad|
|00003df0| 64 69 6e 67 20 61 6e 20 | 61 70 70 6f 69 6e 74 6d |ding an |appointm|
|00003e00| 65 6e 74 2e 0d 09 66 53 | 63 68 65 64 75 6c 65 56 |ent...fS|cheduleV|
|00003e10| 69 65 77 2d 3e 53 65 74 | 45 6d 70 74 79 53 65 6c |iew->Set|EmptySel|
|00003e20| 65 63 74 69 6f 6e 28 6b | 48 69 67 68 6c 69 67 68 |ection(k|Highligh|
|00003e30| 74 29 3b 0d 0d 09 2f 2f | 20 4e 65 77 6c 79 20 61 |t);...//| Newly a|
|00003e40| 64 64 65 64 20 61 70 70 | 6f 69 6e 74 6d 65 6e 74 |dded app|ointment|
|00003e50| 73 20 61 72 65 20 61 6c | 77 61 79 73 20 73 65 6c |s are al|ways sel|
|00003e60| 65 63 74 65 64 2e 0d 09 | 66 41 70 70 6f 69 6e 74 |ected...|fAppoint|
|00003e70| 6d 65 6e 74 2d 3e 53 65 | 74 53 65 6c 65 63 74 28 |ment->Se|tSelect(|
|00003e80| 6b 53 65 6c 65 63 74 29 | 3b 0d 0d 09 66 53 63 68 |kSelect)|;...fSch|
|00003e90| 65 64 75 6c 65 44 6f 63 | 75 6d 65 6e 74 2d 3e 41 |eduleDoc|ument->A|
|00003ea0| 64 64 41 70 70 6f 69 6e | 74 6d 65 6e 74 28 66 41 |ddAppoin|tment(fA|
|00003eb0| 70 70 6f 69 6e 74 6d 65 | 6e 74 29 3b 0d 09 66 53 |ppointme|nt);..fS|
|00003ec0| 63 68 65 64 75 6c 65 56 | 69 65 77 2d 3e 53 63 72 |cheduleV|iew->Scr|
|00003ed0| 6f 6c 6c 53 65 6c 65 63 | 74 69 6f 6e 49 6e 74 6f |ollSelec|tionInto|
|00003ee0| 56 69 65 77 28 6b 52 65 | 64 72 61 77 29 3b 0d 7d |View(kRe|draw);.}|
|00003ef0| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|00003f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 23 70 72 |--------|----.#pr|
|00003f50| 61 67 6d 61 20 73 65 67 | 6d 65 6e 74 20 41 44 6f |agma seg|ment ADo|
|00003f60| 43 6f 6d 6d 61 6e 64 0d | 0d 76 6f 69 64 20 54 41 |Command.|.void TA|
|00003f70| 70 70 6f 69 6e 74 6d 65 | 6e 74 41 64 64 65 72 3a |ppointme|ntAdder:|
|00003f80| 3a 55 6e 64 6f 49 74 28 | 29 09 09 2f 2f 20 4f 56 |:UndoIt(|)..// OV|
|00003f90| 45 52 52 49 44 45 0d 7b | 0d 09 2f 2f 20 52 65 6d |ERRIDE.{|..// Rem|
|00003fa0| 6f 76 65 73 20 74 68 65 | 20 61 70 70 6f 69 6e 74 |oves the| appoint|
|00003fb0| 6d 65 6e 74 20 66 72 6f | 6d 20 74 68 65 20 64 6f |ment fro|m the do|
|00003fc0| 63 75 6d 65 6e 74 2e 0d | 0d 09 66 53 63 68 65 64 |cument..|..fSched|
|00003fd0| 75 6c 65 44 6f 63 75 6d | 65 6e 74 2d 3e 44 65 6c |uleDocum|ent->Del|
|00003fe0| 65 74 65 41 70 70 6f 69 | 6e 74 6d 65 6e 74 28 66 |eteAppoi|ntment(f|
|00003ff0| 41 70 70 6f 69 6e 74 6d | 65 6e 74 29 3b 0d 7d 0d |Appointm|ent);.}.|
|00004000| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00004010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 43 |--------|---.// C|
|00004060| 4c 41 53 53 20 54 41 70 | 70 6f 69 6e 74 6d 65 6e |LASS TAp|pointmen|
|00004070| 74 43 68 61 6e 67 65 72 | 0d 2f 2f 2d 2d 2d 2d 2d |tChanger|.//-----|
|00004080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040d0| 2d 2d 2d 0d 23 70 72 61 | 67 6d 61 20 73 65 67 6d |---.#pra|gma segm|
|000040e0| 65 6e 74 20 41 44 6f 43 | 6f 6d 6d 61 6e 64 0d 0d |ent ADoC|ommand..|
|000040f0| 23 75 6e 64 65 66 20 49 | 6e 68 65 72 69 74 65 64 |#undef I|nherited|
|00004100| 0d 23 64 65 66 69 6e 65 | 20 49 6e 68 65 72 69 74 |.#define| Inherit|
|00004110| 65 64 20 54 43 6f 6d 6d | 61 6e 64 0d 0d 76 6f 69 |ed TComm|and..voi|
|00004120| 64 20 54 41 70 70 6f 69 | 6e 74 6d 65 6e 74 43 68 |d TAppoi|ntmentCh|
|00004130| 61 6e 67 65 72 3a 3a 44 | 6f 49 74 28 29 09 09 09 |anger::D|oIt()...|
|00004140| 09 2f 2f 20 4f 56 45 52 | 52 49 44 45 0d 7b 0d 09 |.// OVER|RIDE.{..|
|00004150| 2f 2f 20 50 72 65 70 61 | 72 65 73 20 74 6f 20 61 |// Prepa|res to a|
|00004160| 64 64 20 61 6e 20 61 70 | 70 6f 69 6e 74 6d 65 6e |dd an ap|pointmen|
|00004170| 74 20 62 79 20 67 65 74 | 74 69 6e 67 20 69 74 73 |t by get|ting its|
|00004180| 20 6e 65 77 20 64 65 73 | 63 72 69 70 74 69 6f 6e | new des|cription|
|00004190| 2e 0d 09 2f 2f 20 54 68 | 65 6e 20 63 61 6c 6c 73 |...// Th|en calls|
|000041a0| 20 52 65 64 6f 49 74 20 | 74 6f 20 6d 61 6b 65 20 | RedoIt |to make |
|000041b0| 74 68 65 20 63 68 61 6e | 67 65 2e 0d 0d 09 2f 2f |the chan|ge....//|
|000041c0| 20 47 65 74 20 74 68 65 | 20 64 69 61 6c 6f 67 20 | Get the| dialog |
|000041d0| 77 69 6e 64 6f 77 0d 09 | 54 57 69 6e 64 6f 77 2a |window..|TWindow*|
|000041e0| 20 61 57 69 6e 64 6f 77 | 20 3d 20 67 56 69 65 77 | aWindow| = gView|
|000041f0| 53 65 72 76 65 72 2d 3e | 4e 65 77 54 65 6d 70 6c |Server->|NewTempl|
|00004200| 61 74 65 57 69 6e 64 6f | 77 28 70 68 47 65 74 44 |ateWindo|w(phGetD|
|00004210| 65 73 63 72 69 70 74 69 | 6f 6e 2c 20 4e 55 4c 4c |escripti|on, NULL|
|00004220| 29 3b 0d 09 46 61 69 6c | 4e 49 4c 28 61 57 69 6e |);..Fail|NIL(aWin|
|00004230| 64 6f 77 29 3b 0d 0d 09 | 2f 2f 20 47 65 74 20 74 |dow);...|// Get t|
|00004240| 68 65 20 65 64 69 74 20 | 74 65 78 74 20 69 74 65 |he edit |text ite|
|00004250| 6d 2e 0d 09 54 45 64 69 | 74 54 65 78 74 2a 20 61 |m...TEdi|tText* a|
|00004260| 6e 45 64 69 74 54 65 78 | 74 20 3d 20 28 54 45 64 |nEditTex|t = (TEd|
|00004270| 69 74 54 65 78 74 2a 29 | 28 61 57 69 6e 64 6f 77 |itText*)|(aWindow|
|00004280| 2d 3e 46 69 6e 64 53 75 | 62 56 69 65 77 28 27 44 |->FindSu|bView('D|
|00004290| 45 53 43 27 29 29 3b 0d | 0d 09 43 53 74 72 32 35 |ESC'));.|..CStr25|
|000042a0| 35 20 6f 6c 64 44 65 73 | 63 72 69 70 74 69 6f 6e |5 oldDes|cription|
|000042b0| 28 66 41 70 70 6f 69 6e | 74 6d 65 6e 74 2d 3e 47 |(fAppoin|tment->G|
|000042c0| 65 74 44 65 73 63 72 69 | 70 74 69 6f 6e 28 29 29 |etDescri|ption())|
|000042d0| 3b 09 2f 2f 20 47 65 74 | 20 74 68 65 20 73 74 61 |;.// Get| the sta|
|000042e0| 72 74 69 6e 67 20 64 65 | 73 63 72 69 70 74 69 6f |rting de|scriptio|
|000042f0| 6e 0d 0d 09 61 6e 45 64 | 69 74 54 65 78 74 2d 3e |n...anEd|itText->|
|00004300| 53 65 74 54 65 78 74 28 | 6f 6c 64 44 65 73 63 72 |SetText(|oldDescr|
|00004310| 69 70 74 69 6f 6e 2c 20 | 6b 44 6f 6e 74 52 65 64 |iption, |kDontRed|
|00004320| 72 61 77 29 3b 0d 0d 09 | 69 66 20 28 61 57 69 6e |raw);...|if (aWin|
|00004330| 64 6f 77 2d 3e 50 6f 73 | 65 4d 6f 64 61 6c 6c 79 |dow->Pos|eModally|
|00004340| 28 29 20 3d 3d 20 27 4f | 4b 20 20 27 29 09 09 09 |() == 'O|K  ')...|
|00004350| 2f 2f 20 72 75 6e 20 74 | 68 65 20 64 69 61 6c 6f |// run t|he dialo|
|00004360| 67 0d 09 7b 0d 09 09 43 | 53 74 72 32 35 35 20 6e |g..{...C|Str255 n|
|00004370| 65 77 44 65 73 63 72 69 | 70 74 69 6f 6e 3b 09 09 |ewDescri|ption;..|
|00004380| 09 09 09 09 2f 2f 20 75 | 73 65 72 20 61 63 63 65 |....// u|ser acce|
|00004390| 70 74 65 64 20 64 69 61 | 6c 6f 67 2e 0d 0d 09 09 |pted dia|log.....|
|000043a0| 61 6e 45 64 69 74 54 65 | 78 74 2d 3e 47 65 74 54 |anEditTe|xt->GetT|
|000043b0| 65 78 74 28 6e 65 77 44 | 65 73 63 72 69 70 74 69 |ext(newD|escripti|
|000043c0| 6f 6e 29 3b 09 09 2f 2f | 20 67 65 74 20 74 68 65 |on);..//| get the|
|000043d0| 20 61 70 70 6f 69 6e 6d | 65 6e 74 0d 0d 23 69 66 | appoinm|ent..#if|
|000043e0| 64 65 66 20 4d 41 43 41 | 50 50 5f 52 5f 31 33 0d |def MACA|PP_R_13.|
|000043f0| 09 09 61 57 69 6e 64 6f | 77 2d 3e 43 6c 6f 73 65 |..aWindo|w->Close|
|00004400| 28 29 3b 09 09 09 09 09 | 09 2f 2f 20 63 6c 6f 73 |();.....|.// clos|
|00004410| 65 20 69 74 2e 0d 09 09 | 64 65 6c 65 74 65 20 61 |e it....|delete a|
|00004420| 57 69 6e 64 6f 77 3b 0d | 23 65 6c 73 65 0d 09 09 |Window;.|#else...|
|00004430| 61 57 69 6e 64 6f 77 2d | 3e 43 6c 6f 73 65 41 6e |aWindow-|>CloseAn|
|00004440| 64 46 72 65 65 28 29 3b | 0d 23 65 6e 64 69 66 0d |dFree();|.#endif.|
|00004450| 09 09 0d 09 09 66 4f 72 | 69 67 69 6e 61 6c 44 65 |.....fOr|iginalDe|
|00004460| 73 63 72 69 70 74 69 6f | 6e 09 3d 20 6f 6c 64 44 |scriptio|n.= oldD|
|00004470| 65 73 63 72 69 70 74 69 | 6f 6e 3b 09 2f 2f 20 66 |escripti|on;.// f|
|00004480| 69 6c 6c 20 69 6e 20 64 | 61 74 61 20 6d 65 6d 62 |ill in d|ata memb|
|00004490| 65 72 73 20 77 69 74 68 | 20 6f 6c 64 20 61 6e 64 |ers with| old and|
|000044a0| 20 6e 65 77 0d 09 09 66 | 4e 65 77 44 65 73 63 72 | new...f|NewDescr|
|000044b0| 69 70 74 69 6f 6e 09 09 | 09 3d 20 6e 65 77 44 65 |iption..|.= newDe|
|000044c0| 73 63 72 69 70 74 69 6f | 6e 3b 0d 09 09 74 68 69 |scriptio|n;...thi|
|000044d0| 73 2d 3e 52 65 64 6f 49 | 74 28 29 3b 09 09 09 09 |s->RedoI|t();....|
|000044e0| 09 09 09 09 2f 2f 20 64 | 6f 20 74 68 65 20 63 68 |....// d|o the ch|
|000044f0| 61 6e 67 65 2e 0d 09 7d | 0d 09 65 6c 73 65 0d 09 |ange...}|..else..|
|00004500| 7b 0d 23 69 66 64 65 66 | 20 4d 41 43 41 50 50 5f |{.#ifdef| MACAPP_|
|00004510| 52 5f 31 33 0d 09 09 61 | 57 69 6e 64 6f 77 2d 3e |R_13...a|Window->|
|00004520| 43 6c 6f 73 65 28 29 3b | 09 09 09 09 09 09 2f 2f |Close();|......//|
|00004530| 20 63 6c 6f 73 65 20 69 | 74 2e 0d 09 09 64 65 6c | close i|t....del|
|00004540| 65 74 65 20 61 57 69 6e | 64 6f 77 3b 0d 23 65 6c |ete aWin|dow;.#el|
|00004550| 73 65 0d 09 09 61 57 69 | 6e 64 6f 77 2d 3e 43 6c |se...aWi|ndow->Cl|
|00004560| 6f 73 65 41 6e 64 46 72 | 65 65 28 29 3b 0d 23 65 |oseAndFr|ee();.#e|
|00004570| 6e 64 69 66 0d 09 09 46 | 61 69 6c 75 72 65 28 30 |ndif...F|ailure(0|
|00004580| 2c 30 29 3b 09 09 09 09 | 09 09 09 09 2f 2f 20 61 |,0);....|....// a|
|00004590| 6e 64 20 66 61 69 6c 20 | 73 69 6c 65 6e 74 6c 79 |nd fail |silently|
|000045a0| 2e 0d 09 7d 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |...}.}..|//------|
|000045b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004600| 2d 2d 0d 23 70 72 61 67 | 6d 61 20 73 65 67 6d 65 |--.#prag|ma segme|
|00004610| 6e 74 20 41 53 65 6c 43 | 6f 6d 6d 61 6e 64 0d 0d |nt ASelC|ommand..|
|00004620| 54 41 70 70 6f 69 6e 74 | 6d 65 6e 74 43 68 61 6e |TAppoint|mentChan|
|00004630| 67 65 72 3a 3a 54 41 70 | 70 6f 69 6e 74 6d 65 6e |ger::TAp|pointmen|
|00004640| 74 43 68 61 6e 67 65 72 | 28 54 53 63 68 65 64 75 |tChanger|(TSchedu|
|00004650| 6c 65 56 69 65 77 2a 20 | 69 74 73 56 69 65 77 2c |leView* |itsView,|
|00004660| 20 54 41 70 70 6f 69 6e | 74 6d 65 6e 74 2a 20 61 | TAppoin|tment* a|
|00004670| 6e 41 70 70 6f 69 6e 74 | 6d 65 6e 74 29 20 3a 0d |nAppoint|ment) :.|
|00004680| 23 69 66 64 65 66 20 4d | 41 43 41 50 50 5f 52 5f |#ifdef M|ACAPP_R_|
|00004690| 31 33 0d 09 54 43 6f 6d | 6d 61 6e 64 28 63 43 68 |13..TCom|mand(cCh|
|000046a0| 61 6e 67 65 41 70 70 6f | 69 6e 74 6d 65 6e 74 2c |angeAppo|intment,|
|000046b0| 20 69 74 73 56 69 65 77 | 2d 3e 47 65 74 53 63 68 | itsView|->GetSch|
|000046c0| 65 64 75 6c 65 44 6f 63 | 75 6d 65 6e 74 28 29 2c |eduleDoc|ument(),|
|000046d0| 20 6b 43 61 6e 55 6e 64 | 6f 2c 20 6b 43 61 75 73 | kCanUnd|o, kCaus|
|000046e0| 65 73 43 68 61 6e 67 65 | 2c 20 69 74 73 56 69 65 |esChange|, itsVie|
|000046f0| 77 2d 3e 47 65 74 53 63 | 68 65 64 75 6c 65 44 6f |w->GetSc|heduleDo|
|00004700| 63 75 6d 65 6e 74 28 29 | 29 2c 0d 23 65 6e 64 69 |cument()|),.#endi|
|00004710| 66 0d 09 66 41 70 70 6f | 69 6e 74 6d 65 6e 74 28 |f..fAppo|intment(|
|00004720| 61 6e 41 70 70 6f 69 6e | 74 6d 65 6e 74 29 0d 7b |anAppoin|tment).{|
|00004730| 0d 23 69 66 6e 64 65 66 | 20 4d 41 43 41 50 50 5f |.#ifndef| MACAPP_|
|00004740| 52 5f 31 33 0d 09 49 43 | 6f 6d 6d 61 6e 64 28 63 |R_13..IC|ommand(c|
|00004750| 43 68 61 6e 67 65 41 70 | 70 6f 69 6e 74 6d 65 6e |ChangeAp|pointmen|
|00004760| 74 2c 20 69 74 73 56 69 | 65 77 2d 3e 47 65 74 53 |t, itsVi|ew->GetS|
|00004770| 63 68 65 64 75 6c 65 44 | 6f 63 75 6d 65 6e 74 28 |cheduleD|ocument(|
|00004780| 29 2c 20 6b 43 61 6e 55 | 6e 64 6f 2c 20 6b 43 61 |), kCanU|ndo, kCa|
|00004790| 75 73 65 73 43 68 61 6e | 67 65 2c 20 69 74 73 56 |usesChan|ge, itsV|
|000047a0| 69 65 77 2d 3e 47 65 74 | 53 63 68 65 64 75 6c 65 |iew->Get|Schedule|
|000047b0| 44 6f 63 75 6d 65 6e 74 | 28 29 29 3b 0d 23 65 6e |Document|());.#en|
|000047c0| 64 69 66 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |dif.}../|/-------|
|000047d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004820| 2d 0d 23 70 72 61 67 6d | 61 20 73 65 67 6d 65 6e |-.#pragm|a segmen|
|00004830| 74 20 41 44 6f 43 6f 6d | 6d 61 6e 64 0d 0d 76 6f |t ADoCom|mand..vo|
|00004840| 69 64 20 54 41 70 70 6f | 69 6e 74 6d 65 6e 74 43 |id TAppo|intmentC|
|00004850| 68 61 6e 67 65 72 3a 3a | 52 65 64 6f 49 74 28 29 |hanger::|RedoIt()|
|00004860| 09 09 2f 2f 20 4f 56 45 | 52 52 49 44 45 0d 7b 0d |..// OVE|RRIDE.{.|
|00004870| 09 2f 2f 20 43 68 61 6e | 67 65 73 20 74 68 65 20 |.// Chan|ges the |
|00004880| 61 70 70 6f 69 6e 74 6d | 65 6e 74 27 73 20 64 65 |appointm|ent's de|
|00004890| 73 63 72 69 70 74 69 6f | 6e 20 74 6f 20 74 68 65 |scriptio|n to the|
|000048a0| 20 6e 65 77 20 76 65 72 | 73 69 6f 6e 2e 0d 0d 09 | new ver|sion....|
|000048b0| 66 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2d 3e 53 65 |fAppoint|ment->Se|
|000048c0| 74 44 65 73 63 72 69 70 | 74 69 6f 6e 28 66 4e 65 |tDescrip|tion(fNe|
|000048d0| 77 44 65 73 63 72 69 70 | 74 69 6f 6e 29 3b 0d 09 |wDescrip|tion);..|
|000048e0| 66 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2d 3e 43 68 |fAppoint|ment->Ch|
|000048f0| 61 6e 67 65 64 28 66 49 | 64 65 6e 74 69 66 69 65 |anged(fI|dentifie|
|00004900| 72 2c 20 74 68 69 73 29 | 3b 0d 7d 0d 0d 2f 2f 2d |r, this)|;.}..//-|
|00004910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004960| 2d 2d 2d 2d 2d 2d 2d 0d | 23 70 72 61 67 6d 61 20 |-------.|#pragma |
|00004970| 73 65 67 6d 65 6e 74 20 | 41 44 6f 43 6f 6d 6d 61 |segment |ADoComma|
|00004980| 6e 64 0d 0d 76 6f 69 64 | 20 54 41 70 70 6f 69 6e |nd..void| TAppoin|
|00004990| 74 6d 65 6e 74 43 68 61 | 6e 67 65 72 3a 3a 55 6e |tmentCha|nger::Un|
|000049a0| 64 6f 49 74 28 29 09 09 | 2f 2f 20 4f 56 45 52 52 |doIt()..|// OVERR|
|000049b0| 49 44 45 0d 7b 0d 09 2f | 2f 20 43 68 61 6e 67 65 |IDE.{../|/ Change|
|000049c0| 73 20 74 68 65 20 61 70 | 70 6f 69 6e 74 6d 65 6e |s the ap|pointmen|
|000049d0| 74 27 73 20 64 65 73 63 | 72 69 70 74 69 6f 6e 20 |t's desc|ription |
|000049e0| 62 61 63 6b 20 74 6f 20 | 74 68 65 20 6f 72 69 67 |back to |the orig|
|000049f0| 69 6e 61 6c 20 76 65 72 | 73 69 6f 6e 2e 0d 0d 09 |inal ver|sion....|
|00004a00| 66 41 70 70 6f 69 6e 74 | 6d 65 6e 74 2d 3e 53 65 |fAppoint|ment->Se|
|00004a10| 74 44 65 73 63 72 69 70 | 74 69 6f 6e 28 66 4f 72 |tDescrip|tion(fOr|
|00004a20| 69 67 69 6e 61 6c 44 65 | 73 63 72 69 70 74 69 6f |iginalDe|scriptio|
|00004a30| 6e 29 3b 0d 09 66 41 70 | 70 6f 69 6e 74 6d 65 6e |n);..fAp|pointmen|
|00004a40| 74 2d 3e 43 68 61 6e 67 | 65 64 28 66 49 64 65 6e |t->Chang|ed(fIden|
|00004a50| 74 69 66 69 65 72 2c 20 | 74 68 69 73 29 3b 0d 7d |tifier, |this);.}|
|00004a60| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|00004a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2f 2f 20 |--------|----.// |
|00004ac0| 43 4c 41 53 53 20 54 4c | 6f 6f 6b 75 70 4c 61 75 |CLASS TL|ookupLau|
|00004ad0| 6e 63 68 65 72 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |ncher.//|--------|
|00004ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b30| 0d 23 70 72 61 67 6d 61 | 20 73 65 67 6d 65 6e 74 |.#pragma| segment|
|00004b40| 20 41 44 6f 43 6f 6d 6d | 61 6e 64 0d 0d 23 75 6e | ADoComm|and..#un|
|00004b50| 64 65 66 20 49 6e 68 65 | 72 69 74 65 64 0d 23 64 |def Inhe|rited.#d|
|00004b60| 65 66 69 6e 65 20 49 6e | 68 65 72 69 74 65 64 20 |efine In|herited |
|00004b70| 54 43 6f 6d 6d 61 6e 64 | 0d 0d 76 6f 69 64 20 54 |TCommand|..void T|
|00004b80| 4c 6f 6f 6b 75 70 4c 61 | 75 6e 63 68 65 72 3a 3a |LookupLa|uncher::|
|00004b90| 44 6f 49 74 28 29 09 2f | 2f 20 4f 56 45 52 52 49 |DoIt()./|/ OVERRI|
|00004ba0| 44 45 0d 7b 0d 09 2f 2f | 20 54 68 69 73 20 63 6f |DE.{..//| This co|
|00004bb0| 6d 6d 61 6e 64 20 72 75 | 6e 73 20 74 68 65 20 50 |mmand ru|ns the P|
|00004bc0| 50 43 42 72 6f 77 73 65 | 72 20 64 69 61 6c 6f 67 |PCBrowse|r dialog|
|00004bd0| 2e 20 49 66 20 6e 6f 74 | 20 63 61 6e 63 65 6c 65 |. If not| cancele|
|00004be0| 64 20 62 79 20 74 68 65 | 20 75 73 65 72 2c 0d 09 |d by the| user,..|
|00004bf0| 2f 2f 20 69 74 20 6f 70 | 65 6e 73 20 74 68 65 20 |// it op|ens the |
|00004c00| 6d 6f 64 65 6c 65 73 73 | 20 4c 6f 6f 6b 75 70 20 |modeless| Lookup |
|00004c10| 64 69 61 6c 6f 67 2e 0d | 0d 09 50 6f 72 74 49 6e |dialog..|..PortIn|
|00004c20| 66 6f 52 65 63 09 09 74 | 68 65 50 6f 72 74 49 6e |foRec..t|hePortIn|
|00004c30| 66 6f 3b 0d 09 54 61 72 | 67 65 74 49 44 09 09 74 |fo;..Tar|getID..t|
|00004c40| 68 65 54 61 72 67 65 74 | 49 44 3b 0d 09 54 4c 6f |heTarget|ID;..TLo|
|00004c50| 6f 6b 75 70 44 69 61 6c | 6f 67 2a 09 74 68 65 44 |okupDial|og*.theD|
|00004c60| 69 61 6c 6f 67 3b 0d 09 | 50 50 43 46 69 6c 74 65 |ialog;..|PPCFilte|
|00004c70| 72 55 50 50 09 70 66 55 | 50 50 20 3d 20 4e 55 4c |rUPP.pfU|PP = NUL|
|00004c80| 4c 3b 0d 09 43 53 74 72 | 32 35 35 09 09 09 74 68 |L;..CStr|255...th|
|00004c90| 65 50 72 6f 6d 70 74 3b | 0d 09 43 53 74 72 32 35 |ePrompt;|..CStr25|
|00004ca0| 35 09 09 09 74 68 65 54 | 79 70 65 3b 0d 0d 09 3a |5...theT|ype;...:|
|00004cb0| 3a 47 65 74 49 6e 64 53 | 74 72 69 6e 67 28 74 68 |:GetIndS|tring(th|
|00004cc0| 65 50 72 6f 6d 70 74 2c | 20 6b 4c 6f 6f 6b 75 70 |ePrompt,| kLookup|
|00004cd0| 42 75 7a 7a 2c 20 6b 50 | 50 43 50 72 6f 6d 70 74 |Buzz, kP|PCPrompt|
|00004ce0| 29 3b 0d 09 3a 3a 47 65 | 74 49 6e 64 53 74 72 69 |);..::Ge|tIndStri|
|00004cf0| 6e 67 28 74 68 65 54 79 | 70 65 2c 20 6b 4c 6f 6f |ng(theTy|pe, kLoo|
|00004d00| 6b 75 70 42 75 7a 7a 2c | 20 6b 50 50 43 54 79 70 |kupBuzz,| kPPCTyp|
|00004d10| 65 29 3b 0d 0d 0d 09 2f | 2f 20 75 73 65 20 50 50 |e);..../|/ use PP|
|00004d20| 43 42 72 6f 77 73 65 72 | 20 74 6f 20 6c 6f 63 61 |CBrowser| to loca|
|00004d30| 74 65 20 74 68 65 20 73 | 63 68 65 64 75 6c 65 20 |te the s|chedule |
|00004d40| 74 6f 20 75 73 65 2e 0d | 09 0d 09 7b 20 2f 2f 20 |to use..|...{ // |
|00004d50| 73 63 6f 70 65 64 20 62 | 65 63 61 75 73 65 20 74 |scoped b|ecause t|
|00004d60| 68 65 72 65 20 77 6f 75 | 6c 64 20 6f 74 68 65 72 |here wou|ld other|
|00004d70| 77 69 73 65 20 62 65 20 | 6d 6f 72 65 20 74 68 61 |wise be |more tha|
|00004d80| 6e 20 6f 6e 65 20 74 72 | 79 20 62 6c 6f 63 6b 20 |n one tr|y block |
|00004d90| 69 6e 20 74 68 65 20 73 | 61 6d 65 20 73 63 6f 70 |in the s|ame scop|
|00004da0| 65 0d 09 09 54 52 59 0d | 09 09 7b 0d 09 09 09 70 |e...TRY.|..{....p|
|00004db0| 66 55 50 50 20 3d 20 4e | 65 77 50 50 43 46 69 6c |fUPP = N|ewPPCFil|
|00004dc0| 74 65 72 50 72 6f 63 28 | 4d 79 50 50 43 42 72 6f |terProc(|MyPPCBro|
|00004dd0| 77 73 65 72 46 69 6c 74 | 65 72 29 3b 0d 09 09 09 |wserFilt|er);....|
|00004de0| 46 61 69 6c 4f 53 45 72 | 72 28 3a 3a 50 50 43 42 |FailOSEr|r(::PPCB|
|00004df0| 72 6f 77 73 65 72 28 74 | 68 65 50 72 6f 6d 70 74 |rowser(t|hePrompt|
|00004e00| 2c 20 74 68 65 54 79 70 | 65 2c 20 66 61 6c 73 65 |, theTyp|e, false|
|00004e10| 2c 20 26 74 68 65 54 61 | 72 67 65 74 49 44 2e 6c |, &theTa|rgetID.l|
|00004e20| 6f 63 61 74 69 6f 6e 2c | 20 26 74 68 65 50 6f 72 |ocation,| &thePor|
|00004e30| 74 49 6e 66 6f 2c 0d 09 | 09 09 09 09 09 09 09 20 |tInfo,..|....... |
|00004e40| 20 20 70 66 55 50 50 2c | 20 67 45 6d 70 74 79 53 |  pfUPP,| gEmptyS|
|00004e50| 74 72 69 6e 67 29 29 3b | 0d 09 09 09 44 69 73 70 |tring));|....Disp|
|00004e60| 6f 73 65 52 6f 75 74 69 | 6e 65 44 65 73 63 72 69 |oseRouti|neDescri|
|00004e70| 70 74 6f 72 28 70 66 55 | 50 50 29 3b 0d 09 09 7d |ptor(pfU|PP);...}|
|00004e80| 0d 09 09 43 41 54 43 48 | 5f 41 4c 4c 0d 09 09 7b |...CATCH|_ALL...{|
|00004e90| 0d 09 09 09 44 69 73 70 | 6f 73 65 52 6f 75 74 69 |....Disp|oseRouti|
|00004ea0| 6e 65 44 65 73 63 72 69 | 70 74 6f 72 28 70 66 55 |neDescri|ptor(pfU|
|00004eb0| 50 50 29 3b 0d 09 09 09 | 69 66 20 28 66 69 2e 65 |PP);....|if (fi.e|
|00004ec0| 72 72 6f 72 20 3d 3d 20 | 75 73 65 72 43 61 6e 63 |rror == |userCanc|
|00004ed0| 65 6c 65 64 45 72 72 29 | 09 2f 2f 20 69 66 20 75 |eledErr)|.// if u|
|00004ee0| 73 65 72 20 63 61 6e 63 | 65 6c 6c 65 64 2c 0d 09 |ser canc|elled,..|
|00004ef0| 09 09 09 66 69 2e 65 72 | 72 6f 72 20 3d 20 6e 6f |...fi.er|ror = no|
|00004f00| 45 72 72 3b 09 09 09 09 | 2f 2f 20 66 61 69 6c 20 |Err;....|// fail |
|00004f10| 73 69 6c 65 6e 74 6c 79 | 2e 0d 09 09 09 54 48 52 |silently|.....THR|
|00004f20| 4f 57 3b 0d 09 09 7d 0d | 09 09 45 4e 44 54 52 59 |OW;...}.|..ENDTRY|
|00004f30| 3b 20 0d 09 7d 0d 09 74 | 68 65 54 61 72 67 65 74 |; ..}..t|heTarget|
|00004f40| 49 44 2e 6e 61 6d 65 20 | 3d 20 74 68 65 50 6f 72 |ID.name |= thePor|
|00004f50| 74 49 6e 66 6f 2e 6e 61 | 6d 65 3b 0d 0d 09 2f 2f |tInfo.na|me;...//|
|00004f60| 20 67 6f 74 20 69 74 2c | 20 73 6f 20 63 72 65 61 | got it,| so crea|
|00004f70| 74 65 20 74 68 65 20 28 | 6d 6f 64 65 6c 65 73 73 |te the (|modeless|
|00004f80| 29 20 6c 6f 6f 6b 75 70 | 20 77 69 6e 64 6f 77 2e |) lookup| window.|
|00004f90| 20 28 49 74 20 77 69 6c | 6c 20 66 72 65 65 20 69 | (It wil|l free i|
|00004fa0| 74 73 65 6c 66 20 6f 6e | 20 63 6c 6f 73 69 6e 67 |tself on| closing|
|00004fb0| 2e 29 0d 0d 09 4d 41 56 | 6f 6c 61 74 69 6c 65 49 |.)...MAV|olatileI|
|00004fc0| 6e 69 74 28 54 57 69 6e | 64 6f 77 2a 2c 20 74 68 |nit(TWin|dow*, th|
|00004fd0| 65 57 69 6e 64 6f 77 2c | 20 67 56 69 65 77 53 65 |eWindow,| gViewSe|
|00004fe0| 72 76 65 72 2d 3e 4e 65 | 77 54 65 6d 70 6c 61 74 |rver->Ne|wTemplat|
|00004ff0| 65 57 69 6e 64 6f 77 28 | 70 68 4c 6f 6f 6b 75 70 |eWindow(|phLookup|
|00005000| 44 69 61 6c 6f 67 2c 20 | 4e 55 4c 4c 29 29 3b 0d |Dialog, |NULL));.|
|00005010| 09 46 61 69 6c 4e 49 4c | 28 74 68 65 57 69 6e 64 |.FailNIL|(theWind|
|00005020| 6f 77 29 3b 0d 09 74 68 | 65 44 69 61 6c 6f 67 20 |ow);..th|eDialog |
|00005030| 3d 20 28 54 4c 6f 6f 6b | 75 70 44 69 61 6c 6f 67 |= (TLook|upDialog|
|00005040| 2a 29 28 74 68 65 57 69 | 6e 64 6f 77 2d 3e 46 69 |*)(theWi|ndow->Fi|
|00005050| 6e 64 53 75 62 56 69 65 | 77 28 27 44 4c 4f 47 27 |ndSubVie|w('DLOG'|
|00005060| 29 29 3b 0d 0d 09 7b 20 | 2f 2f 20 73 63 6f 70 65 |));...{ |// scope|
|00005070| 64 20 62 65 63 61 75 73 | 65 20 74 68 65 72 65 20 |d becaus|e there |
|00005080| 77 6f 75 6c 64 20 6f 74 | 68 65 72 77 69 73 65 20 |would ot|herwise |
|00005090| 62 65 20 6d 6f 72 65 20 | 74 68 61 6e 20 6f 6e 65 |be more |than one|
|000050a0| 20 74 72 79 20 62 6c 6f | 63 6b 20 69 6e 20 74 68 | try blo|ck in th|
|000050b0| 65 20 73 61 6d 65 20 73 | 63 6f 70 65 0d 09 09 54 |e same s|cope...T|
|000050c0| 52 59 0d 09 09 7b 0d 09 | 09 09 74 68 65 44 69 61 |RY...{..|..theDia|
|000050d0| 6c 6f 67 2d 3e 48 61 76 | 65 41 64 64 72 65 73 73 |log->Hav|eAddress|
|000050e0| 28 74 68 65 54 61 72 67 | 65 74 49 44 29 3b 09 09 |(theTarg|etID);..|
|000050f0| 2f 2f 20 72 65 67 69 73 | 74 65 72 20 74 68 65 20 |// regis|ter the |
|00005100| 74 61 72 67 65 74 0d 0d | 09 09 09 74 68 65 57 69 |target..|...theWi|
|00005110| 6e 64 6f 77 2d 3e 53 65 | 74 54 69 74 6c 65 46 6f |ndow->Se|tTitleFo|
|00005120| 72 44 6f 63 28 74 68 65 | 50 6f 72 74 49 6e 66 6f |rDoc(the|PortInfo|
|00005130| 2e 6e 61 6d 65 2e 6e 61 | 6d 65 29 3b 0d 0d 09 09 |.name.na|me);....|
|00005140| 09 74 68 65 57 69 6e 64 | 6f 77 2d 3e 4f 70 65 6e |.theWind|ow->Open|
|00005150| 28 29 3b 0d 09 09 09 74 | 68 65 57 69 6e 64 6f 77 |();....t|heWindow|
|00005160| 2d 3e 53 65 6c 65 63 74 | 28 29 3b 0d 09 09 7d 0d |->Select|();...}.|
|00005170| 09 09 43 41 54 43 48 5f | 41 4c 4c 0d 09 09 7b 0d |..CATCH_|ALL...{.|
|00005180| 09 09 09 46 72 65 65 49 | 66 4f 62 6a 65 63 74 28 |...FreeI|fObject(|
|00005190| 74 68 65 57 69 6e 64 6f | 77 29 3b 0d 09 09 09 54 |theWindo|w);....T|
|000051a0| 48 52 4f 57 3b 0d 09 09 | 7d 0d 09 09 45 4e 44 54 |HROW;...|}...ENDT|
|000051b0| 52 59 3b 0d 09 7d 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |RY;..}.}|..//----|
|000051c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005210| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|00005220| 6d 65 6e 74 20 41 53 65 | 6c 43 6f 6d 6d 61 6e 64 |ment ASe|lCommand|
|00005230| 0d 0d 54 4c 6f 6f 6b 75 | 70 4c 61 75 6e 63 68 65 |..TLooku|pLaunche|
|00005240| 72 3a 3a 54 4c 6f 6f 6b | 75 70 4c 61 75 6e 63 68 |r::TLook|upLaunch|
|00005250| 65 72 28 43 6f 6d 6d 61 | 6e 64 4e 75 6d 62 65 72 |er(Comma|ndNumber|
|00005260| 20 61 43 6f 6d 6d 61 6e | 64 4e 75 6d 62 65 72 29 | aComman|dNumber)|
|00005270| 0d 23 69 66 64 65 66 20 | 4d 41 43 41 50 50 5f 52 |.#ifdef |MACAPP_R|
|00005280| 5f 31 33 0d 09 3a 20 54 | 43 6f 6d 6d 61 6e 64 28 |_13..: T|Command(|
|00005290| 61 43 6f 6d 6d 61 6e 64 | 4e 75 6d 62 65 72 2c 20 |aCommand|Number, |
|000052a0| 4e 55 4c 4c 2c 20 6b 43 | 61 6e 74 55 6e 64 6f 2c |NULL, kC|antUndo,|
|000052b0| 20 6b 44 6f 65 73 4e 6f | 74 43 61 75 73 65 43 68 | kDoesNo|tCauseCh|
|000052c0| 61 6e 67 65 2c 20 4e 55 | 4c 4c 29 0d 23 65 6e 64 |ange, NU|LL).#end|
|000052d0| 69 66 0d 7b 0d 23 69 66 | 6e 64 65 66 20 4d 41 43 |if.{.#if|ndef MAC|
|000052e0| 41 50 50 5f 52 5f 31 33 | 0d 09 49 43 6f 6d 6d 61 |APP_R_13|..IComma|
|000052f0| 6e 64 28 61 43 6f 6d 6d | 61 6e 64 4e 75 6d 62 65 |nd(aComm|andNumbe|
|00005300| 72 2c 20 4e 55 4c 4c 2c | 20 6b 43 61 6e 74 55 6e |r, NULL,| kCantUn|
|00005310| 64 6f 2c 20 6b 44 6f 65 | 73 4e 6f 74 43 61 75 73 |do, kDoe|sNotCaus|
|00005320| 65 43 68 61 6e 67 65 2c | 20 4e 55 4c 4c 29 3b 0d |eChange,| NULL);.|
|00005330| 23 65 6e 64 69 66 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |#endif.}|..//----|
|00005340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005390| 2d 2d 2d 2d 0d 2f 2f 20 | 43 4c 41 53 53 20 54 53 |----.// |CLASS TS|
|000053a0| 63 68 65 64 75 6c 65 43 | 6c 69 65 6e 74 43 6f 6d |cheduleC|lientCom|
|000053b0| 6d 61 6e 64 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |mand.//-|--------|
|000053c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00005410| 23 70 72 61 67 6d 61 20 | 73 65 67 6d 65 6e 74 20 |#pragma |segment |
|00005420| 41 44 6f 43 6f 6d 6d 61 | 6e 64 0d 0d 23 75 6e 64 |ADoComma|nd..#und|
|00005430| 65 66 20 49 6e 68 65 72 | 69 74 65 64 0d 23 64 65 |ef Inher|ited.#de|
|00005440| 66 69 6e 65 20 49 6e 68 | 65 72 69 74 65 64 20 54 |fine Inh|erited T|
|00005450| 43 6c 69 65 6e 74 43 6f | 6d 6d 61 6e 64 0d 0d 76 |ClientCo|mmand..v|
|00005460| 6f 69 64 20 54 53 63 68 | 65 64 75 6c 65 43 6c 69 |oid TSch|eduleCli|
|00005470| 65 6e 74 43 6f 6d 6d 61 | 6e 64 3a 3a 44 6f 49 74 |entComma|nd::DoIt|
|00005480| 28 29 09 2f 2f 20 4f 56 | 45 52 52 49 44 45 0d 7b |().// OV|ERRIDE.{|
|00005490| 0d 09 69 66 20 28 66 44 | 75 72 61 74 69 6f 6e 29 |..if (fD|uration)|
|000054a0| 0d 09 7b 0d 09 09 43 53 | 74 72 32 35 35 20 61 53 |..{...CS|tr255 aS|
|000054b0| 74 72 69 6e 67 28 47 65 | 74 44 61 79 28 66 44 61 |tring(Ge|tDay(fDa|
|000054c0| 79 29 29 3b 0d 09 09 4d | 41 50 61 72 61 6d 54 65 |y));...M|AParamTe|
|000054d0| 78 74 28 22 5e 4c 6f 6f | 6b 75 70 44 61 79 22 2c |xt("^Loo|kupDay",|
|000054e0| 20 61 53 74 72 69 6e 67 | 29 3b 0d 0d 09 09 61 53 | aString|);....aS|
|000054f0| 74 72 69 6e 67 20 3d 20 | 47 65 74 54 69 6d 65 28 |tring = |GetTime(|
|00005500| 66 54 69 6d 65 29 3b 0d | 09 09 4d 41 50 61 72 61 |fTime);.|..MAPara|
|00005510| 6d 54 65 78 74 28 22 5e | 4c 6f 6f 6b 75 70 54 69 |mText("^|LookupTi|
|00005520| 6d 65 22 2c 20 61 53 74 | 72 69 6e 67 29 3b 0d 0d |me", aSt|ring);..|
|00005530| 09 09 61 53 74 72 69 6e | 67 20 3d 20 47 65 74 44 |..aStrin|g = GetD|
|00005540| 75 72 61 74 69 6f 6e 28 | 66 44 75 72 61 74 69 6f |uration(|fDuratio|
|00005550| 6e 29 3b 0d 09 09 4d 41 | 50 61 72 61 6d 54 65 78 |n);...MA|ParamTex|
|00005560| 74 28 22 5e 4c 6f 6f 6b | 75 70 44 75 72 61 74 69 |t("^Look|upDurati|
|00005570| 6f 6e 22 2c 20 61 53 74 | 72 69 6e 67 29 3b 0d 0d |on", aSt|ring);..|
|00005580| 09 09 4d 41 50 61 72 61 | 6d 54 65 78 74 28 22 5e |..MAPara|mText("^|
|00005590| 4c 6f 6f 6b 75 70 44 6f | 63 75 6d 65 6e 74 22 2c |LookupDo|cument",|
|000055a0| 20 66 44 6f 63 75 6d 65 | 6e 74 54 69 74 6c 65 29 | fDocume|ntTitle)|
|000055b0| 3b 0d 0d 09 09 3a 3a 47 | 65 74 49 6e 64 53 74 72 |;....::G|etIndStr|
|000055c0| 69 6e 67 28 61 53 74 72 | 69 6e 67 2c 20 47 65 74 |ing(aStr|ing, Get|
|000055d0| 49 44 46 6f 72 53 63 72 | 69 70 74 5f 41 43 28 27 |IDForScr|ipt_AC('|
|000055e0| 53 54 52 23 27 2c 20 6b | 4c 6f 6f 6b 75 70 42 75 |STR#', k|LookupBu|
|000055f0| 7a 7a 2c 20 47 65 74 52 | 65 67 69 6f 6e 43 6f 64 |zz, GetR|egionCod|
|00005600| 65 28 29 29 2c 20 31 29 | 3b 0d 09 09 4d 41 52 65 |e()), 1)|;...MARe|
|00005610| 70 6c 61 63 65 54 65 78 | 74 28 61 53 74 72 69 6e |placeTex|t(aStrin|
|00005620| 67 29 3b 0d 0d 09 09 28 | 28 54 4c 6f 6f 6b 75 70 |g);....(|(TLookup|
|00005630| 44 69 61 6c 6f 67 2a 29 | 66 43 6f 6e 74 65 78 74 |Dialog*)|fContext|
|00005640| 29 2d 3e 48 61 76 65 52 | 65 73 70 6f 6e 73 65 28 |)->HaveR|esponse(|
|00005650| 61 53 74 72 69 6e 67 29 | 3b 09 2f 2f 20 73 68 6f |aString)|;.// sho|
|00005660| 77 20 74 68 65 20 72 65 | 73 75 6c 74 20 69 6e 20 |w the re|sult in |
|00005670| 74 68 65 20 77 69 6e 64 | 6f 77 0d 09 7d 0d 09 65 |the wind|ow..}..e|
|00005680| 6c 73 65 0d 09 7b 0d 09 | 09 28 28 54 4c 6f 6f 6b |lse..{..|.((TLook|
|00005690| 75 70 44 69 61 6c 6f 67 | 2a 29 66 43 6f 6e 74 65 |upDialog|*)fConte|
|000056a0| 78 74 29 2d 3e 48 61 76 | 65 52 65 73 70 6f 6e 73 |xt)->Hav|eRespons|
|000056b0| 65 28 67 45 6d 70 74 79 | 53 74 72 69 6e 67 29 3b |e(gEmpty|String);|
|000056c0| 09 09 2f 2f 20 63 6c 65 | 61 72 20 74 68 65 20 72 |..// cle|ar the r|
|000056d0| 65 73 70 6f 6e 73 65 0d | 09 09 46 61 69 6c 75 72 |esponse.|..Failur|
|000056e0| 65 28 65 72 72 41 70 70 | 6f 69 6e 74 6d 65 6e 74 |e(errApp|ointment|
|000056f0| 4e 6f 74 41 76 61 69 6c | 61 62 6c 65 2c 20 6d 65 |NotAvail|able, me|
|00005700| 73 73 61 67 65 4c 6f 6f | 6b 75 70 20 2b 20 65 72 |ssageLoo|kup + er|
|00005710| 72 41 70 70 6f 69 6e 74 | 6d 65 6e 74 4e 6f 74 41 |rAppoint|mentNotA|
|00005720| 76 61 69 6c 61 62 6c 65 | 29 3b 0d 09 7d 0d 7d 0d |vailable|);..}.}.|
|00005730| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00005740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005750| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 23 70 72 61 |--------|---.#pra|
|00005790| 67 6d 61 20 73 65 67 6d | 65 6e 74 20 41 53 65 6c |gma segm|ent ASel|
|000057a0| 43 6f 6d 6d 61 6e 64 0d | 0d 54 53 63 68 65 64 75 |Command.|.TSchedu|
|000057b0| 6c 65 43 6c 69 65 6e 74 | 43 6f 6d 6d 61 6e 64 3a |leClient|Command:|
|000057c0| 3a 54 53 63 68 65 64 75 | 6c 65 43 6c 69 65 6e 74 |:TSchedu|leClient|
|000057d0| 43 6f 6d 6d 61 6e 64 28 | 43 6f 6d 6d 61 6e 64 4e |Command(|CommandN|
|000057e0| 75 6d 62 65 72 20 69 74 | 73 43 6f 6d 6d 61 6e 64 |umber it|sCommand|
|000057f0| 4e 75 6d 62 65 72 2c 0d | 09 09 09 09 09 09 09 09 |Number,.|........|
|00005800| 09 09 09 09 09 54 4c 6f | 6f 6b 75 70 44 69 61 6c |.....TLo|okupDial|
|00005810| 6f 67 2a 20 69 74 73 56 | 69 65 77 2c 0d 09 09 09 |og* itsV|iew,....|
|00005820| 09 09 09 09 09 09 09 09 | 09 09 63 6f 6e 73 74 20 |........|..const |
|00005830| 44 61 79 49 6e 64 65 78 | 20 74 68 65 44 61 79 2c |DayIndex| theDay,|
|00005840| 0d 09 09 09 09 09 09 09 | 09 09 09 09 09 09 63 6f |........|......co|
|00005850| 6e 73 74 20 54 69 6d 65 | 49 6e 64 65 78 20 74 68 |nst Time|Index th|
|00005860| 65 54 69 6d 65 2c 0d 09 | 09 09 09 09 09 09 09 09 |eTime,..|........|
|00005870| 09 09 09 09 63 6f 6e 73 | 74 20 41 45 41 64 64 72 |....cons|t AEAddr|
|00005880| 65 73 73 44 65 73 63 26 | 20 69 74 73 41 64 64 72 |essDesc&| itsAddr|
|00005890| 65 73 73 29 20 3a 0d 23 | 69 66 64 65 66 20 4d 41 |ess) :.#|ifdef MA|
|000058a0| 43 41 50 50 5f 52 5f 31 | 33 0d 09 54 43 6c 69 65 |CAPP_R_1|3..TClie|
|000058b0| 6e 74 43 6f 6d 6d 61 6e | 64 28 69 74 73 43 6f 6d |ntComman|d(itsCom|
|000058c0| 6d 61 6e 64 4e 75 6d 62 | 65 72 2c 20 69 74 73 56 |mandNumb|er, itsV|
|000058d0| 69 65 77 2c 20 6b 43 61 | 6e 74 55 6e 64 6f 2c 20 |iew, kCa|ntUndo, |
|000058e0| 6b 44 6f 65 73 4e 6f 74 | 43 61 75 73 65 43 68 61 |kDoesNot|CauseCha|
|000058f0| 6e 67 65 2c 20 4e 55 4c | 4c 29 2c 0d 23 65 6e 64 |nge, NUL|L),.#end|
|00005900| 69 66 0d 09 66 44 61 79 | 28 74 68 65 44 61 79 29 |if..fDay|(theDay)|
|00005910| 2c 0d 09 66 54 69 6d 65 | 28 74 68 65 54 69 6d 65 |,..fTime|(theTime|
|00005920| 29 2c 0d 09 66 44 75 72 | 61 74 69 6f 6e 28 30 29 |),..fDur|ation(0)|
|00005930| 2c 0d 09 66 44 6f 63 75 | 6d 65 6e 74 54 69 74 6c |,..fDocu|mentTitl|
|00005940| 65 28 67 45 6d 70 74 79 | 53 74 72 69 6e 67 29 09 |e(gEmpty|String).|
|00005950| 09 09 09 0d 7b 0d 09 2f | 2f 20 50 72 65 70 61 72 |....{../|/ Prepar|
|00005960| 65 73 20 74 68 65 20 54 | 41 70 70 6c 65 45 76 65 |es the T|AppleEve|
|00005970| 6e 74 20 66 6f 72 20 74 | 72 61 6e 73 6d 69 73 73 |nt for t|ransmiss|
|00005980| 69 6f 6e 20 74 6f 20 74 | 68 65 20 73 65 72 76 65 |ion to t|he serve|
|00005990| 72 2e 0d 23 69 66 6e 64 | 65 66 20 4d 41 43 41 50 |r..#ifnd|ef MACAP|
|000059a0| 50 5f 52 5f 31 33 0d 09 | 49 43 6c 69 65 6e 74 43 |P_R_13..|IClientC|
|000059b0| 6f 6d 6d 61 6e 64 28 69 | 74 73 43 6f 6d 6d 61 6e |ommand(i|tsComman|
|000059c0| 64 4e 75 6d 62 65 72 2c | 20 69 74 73 56 69 65 77 |dNumber,| itsView|
|000059d0| 2c 20 6b 43 61 6e 74 55 | 6e 64 6f 2c 20 6b 44 6f |, kCantU|ndo, kDo|
|000059e0| 65 73 4e 6f 74 43 61 75 | 73 65 43 68 61 6e 67 65 |esNotCau|seChange|
|000059f0| 2c 20 4e 55 4c 4c 29 3b | 0d 09 54 41 70 70 6c 65 |, NULL);|..TApple|
|00005a00| 45 76 65 6e 74 2a 20 61 | 4d 65 73 73 61 67 65 20 |Event* a|Message |
|00005a10| 3d 20 54 48 5f 6e 65 77 | 20 54 41 70 70 6c 65 45 |= TH_new| TAppleE|
|00005a20| 76 65 6e 74 3b 0d 09 61 | 4d 65 73 73 61 67 65 2d |vent;..a|Message-|
|00005a30| 3e 49 41 70 70 6c 65 45 | 76 65 6e 74 28 6b 41 45 |>IAppleE|vent(kAE|
|00005a40| 53 63 68 65 64 75 6c 65 | 53 75 69 74 65 49 44 2c |Schedule|SuiteID,|
|00005a50| 20 6b 41 45 4c 6f 6f 6b | 75 70 49 44 2c 20 69 74 | kAELook|upID, it|
|00005a60| 73 41 64 64 72 65 73 73 | 2c 20 6b 41 45 51 75 65 |sAddress|, kAEQue|
|00005a70| 75 65 52 65 70 6c 79 29 | 3b 0d 23 65 6c 73 65 0d |ueReply)|;.#else.|
|00005a80| 09 54 41 70 70 6c 65 45 | 76 65 6e 74 2a 20 61 4d |.TAppleE|vent* aM|
|00005a90| 65 73 73 61 67 65 20 3d | 20 54 48 5f 6e 65 77 20 |essage =| TH_new |
|00005aa0| 54 41 70 70 6c 65 45 76 | 65 6e 74 28 6b 41 45 53 |TAppleEv|ent(kAES|
|00005ab0| 63 68 65 64 75 6c 65 53 | 75 69 74 65 49 44 2c 20 |cheduleS|uiteID, |
|00005ac0| 6b 41 45 4c 6f 6f 6b 75 | 70 49 44 2c 20 69 74 73 |kAELooku|pID, its|
|00005ad0| 41 64 64 72 65 73 73 2c | 20 6b 41 45 51 75 65 75 |Address,| kAEQueu|
|00005ae0| 65 52 65 70 6c 79 29 3b | 0d 23 65 6e 64 69 66 0d |eReply);|.#endif.|
|00005af0| 09 66 4d 65 73 73 61 67 | 65 20 3d 20 61 4d 65 73 |.fMessag|e = aMes|
|00005b00| 73 61 67 65 3b 0d 0d 09 | 66 4d 65 73 73 61 67 65 |sage;...|fMessage|
|00005b10| 2d 3e 57 72 69 74 65 53 | 68 6f 72 74 28 6b 41 45 |->WriteS|hort(kAE|
|00005b20| 44 61 79 2c 20 74 68 65 | 44 61 79 29 3b 0d 09 66 |Day, the|Day);..f|
|00005b30| 4d 65 73 73 61 67 65 2d | 3e 57 72 69 74 65 53 68 |Message-|>WriteSh|
|00005b40| 6f 72 74 28 6b 41 45 54 | 69 6d 65 2c 20 74 68 65 |ort(kAET|ime, the|
|00005b50| 54 69 6d 65 29 3b 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |Time);.}|..//----|
|00005b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005ba0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005bb0| 2d 2d 2d 2d 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |----.#pr|agma seg|
|00005bc0| 6d 65 6e 74 20 41 44 6f | 43 6f 6d 6d 61 6e 64 0d |ment ADo|Command.|
|00005bd0| 0d 76 6f 69 64 20 54 53 | 63 68 65 64 75 6c 65 43 |.void TS|cheduleC|
|00005be0| 6c 69 65 6e 74 43 6f 6d | 6d 61 6e 64 3a 3a 50 72 |lientCom|mand::Pr|
|00005bf0| 6f 63 65 73 73 52 65 70 | 6c 79 28 54 41 70 70 6c |ocessRep|ly(TAppl|
|00005c00| 65 45 76 65 6e 74 2a 20 | 74 68 65 52 65 70 6c 79 |eEvent* |theReply|
|00005c10| 29 09 09 2f 2f 20 4f 56 | 45 52 52 49 44 45 0d 7b |)..// OV|ERRIDE.{|
|00005c20| 0d 09 2f 2f 20 50 72 6f | 63 65 73 73 65 73 20 74 |..// Pro|cesses t|
|00005c30| 68 65 20 72 65 70 6c 79 | 20 66 72 6f 6d 20 74 68 |he reply| from th|
|00005c40| 65 20 73 65 72 76 65 72 | 2e 20 4c 6f 61 64 73 20 |e server|. Loads |
|00005c50| 6d 65 6d 62 65 72 73 20 | 77 69 74 68 20 72 65 73 |members |with res|
|00005c60| 75 6c 74 73 20 6f 66 20 | 6c 6f 6f 6b 75 70 2e 0d |ults of |lookup..|
|00005c70| 0d 09 49 6e 68 65 72 69 | 74 65 64 3a 3a 50 72 6f |..Inheri|ted::Pro|
|00005c80| 63 65 73 73 52 65 70 6c | 79 28 74 68 65 52 65 70 |cessRepl|y(theRep|
|00005c90| 6c 79 29 3b 0d 0d 09 54 | 52 59 0d 09 7b 0d 09 09 |ly);...T|RY..{...|
|00005ca0| 46 61 69 6c 4f 53 45 72 | 72 28 74 68 65 52 65 70 |FailOSEr|r(theRep|
|00005cb0| 6c 79 2d 3e 52 65 61 64 | 53 68 6f 72 74 28 6b 65 |ly->Read|Short(ke|
|00005cc0| 79 45 72 72 6f 72 4e 75 | 6d 62 65 72 29 29 3b 0d |yErrorNu|mber));.|
|00005cd0| 09 09 45 4e 44 54 52 59 | 3b 0d 09 7d 0d 09 43 41 |..ENDTRY|;..}..CA|
|00005ce0| 54 43 48 5f 41 4c 4c 0d | 09 7b 0d 09 09 69 66 20 |TCH_ALL.|.{...if |
|00005cf0| 28 66 69 2e 65 72 72 6f | 72 20 21 3d 20 65 72 72 |(fi.erro|r != err|
|00005d00| 41 45 44 65 73 63 4e 6f | 74 46 6f 75 6e 64 29 20 |AEDescNo|tFound) |
|00005d10| 7b 0d 09 09 09 54 48 52 | 4f 57 3b 0d 09 09 7d 0d |{....THR|OW;...}.|
|00005d20| 09 7d 0d 0d 09 54 69 6d | 65 49 6e 64 65 78 20 74 |.}...Tim|eIndex t|
|00005d30| 68 65 44 75 72 61 74 69 | 6f 6e 20 3d 20 74 68 65 |heDurati|on = the|
|00005d40| 52 65 70 6c 79 2d 3e 52 | 65 61 64 53 68 6f 72 74 |Reply->R|eadShort|
|00005d50| 28 6b 41 45 44 75 72 61 | 74 69 6f 6e 29 3b 0d 09 |(kAEDura|tion);..|
|00005d60| 66 44 75 72 61 74 69 6f | 6e 20 3d 20 74 68 65 44 |fDuratio|n = theD|
|00005d70| 75 72 61 74 69 6f 6e 3b | 0d 0d 09 43 53 74 72 32 |uration;|...CStr2|
|00005d80| 35 35 20 64 6f 63 75 6d | 65 6e 74 54 69 74 6c 65 |55 docum|entTitle|
|00005d90| 3b 0d 09 74 68 65 52 65 | 70 6c 79 2d 3e 52 65 61 |;..theRe|ply->Rea|
|00005da0| 64 53 74 72 69 6e 67 28 | 6b 41 45 44 6f 63 75 6d |dString(|kAEDocum|
|00005db0| 65 6e 74 2c 20 64 6f 63 | 75 6d 65 6e 74 54 69 74 |ent, doc|umentTit|
|00005dc0| 6c 65 29 3b 0d 09 66 44 | 6f 63 75 6d 65 6e 74 54 |le);..fD|ocumentT|
|00005dd0| 69 74 6c 65 20 3d 20 64 | 6f 63 75 6d 65 6e 74 54 |itle = d|ocumentT|
|00005de0| 69 74 6c 65 3b 0d 7d 0d | 0d 2f 2f 2d 2d 2d 2d 2d |itle;.}.|.//-----|
|00005df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e40| 2d 2d 2d 0d 2f 2f 20 43 | 4c 41 53 53 20 54 53 63 |---.// C|LASS TSc|
|00005e50| 68 65 64 75 6c 65 53 65 | 72 76 65 72 43 6f 6d 6d |heduleSe|rverComm|
|00005e60| 61 6e 64 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |and.//--|--------|
|00005e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005ea0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005eb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 23 |--------|------.#|
|00005ec0| 70 72 61 67 6d 61 20 73 | 65 67 6d 65 6e 74 20 41 |pragma s|egment A|
|00005ed0| 44 6f 43 6f 6d 6d 61 6e | 64 0d 0d 23 75 6e 64 65 |DoComman|d..#unde|
|00005ee0| 66 20 49 6e 68 65 72 69 | 74 65 64 0d 23 64 65 66 |f Inheri|ted.#def|
|00005ef0| 69 6e 65 20 49 6e 68 65 | 72 69 74 65 64 20 54 53 |ine Inhe|rited TS|
|00005f00| 65 72 76 65 72 43 6f 6d | 6d 61 6e 64 0d 0d 54 53 |erverCom|mand..TS|
|00005f10| 63 68 65 64 75 6c 65 53 | 65 72 76 65 72 43 6f 6d |cheduleS|erverCom|
|00005f20| 6d 61 6e 64 3a 3a 54 53 | 63 68 65 64 75 6c 65 53 |mand::TS|cheduleS|
|00005f30| 65 72 76 65 72 43 6f 6d | 6d 61 6e 64 28 43 6f 6d |erverCom|mand(Com|
|00005f40| 6d 61 6e 64 4e 75 6d 62 | 65 72 20 69 74 73 43 6f |mandNumb|er itsCo|
|00005f50| 6d 6d 61 6e 64 4e 75 6d | 62 65 72 2c 0d 09 09 09 |mmandNum|ber,....|
|00005f60| 09 09 09 41 50 50 4c 45 | 45 56 45 4e 54 50 54 52 |...APPLE|EVENTPTR|
|00005f70| 20 69 74 73 4d 65 73 73 | 61 67 65 2c 0d 09 09 09 | itsMess|age,....|
|00005f80| 09 09 09 41 50 50 4c 45 | 45 56 45 4e 54 50 54 52 |...APPLE|EVENTPTR|
|00005f90| 20 69 74 73 52 65 70 6c | 79 29 0d 23 69 66 64 65 | itsRepl|y).#ifde|
|00005fa0| 66 20 4d 41 43 41 50 50 | 5f 52 5f 31 33 0d 09 09 |f MACAPP|_R_13...|
|00005fb0| 3a 20 54 53 65 72 76 65 | 72 43 6f 6d 6d 61 6e 64 |: TServe|rCommand|
|00005fc0| 28 69 74 73 43 6f 6d 6d | 61 6e 64 4e 75 6d 62 65 |(itsComm|andNumbe|
|00005fd0| 72 2c 20 4e 55 4c 4c 2c | 20 6b 43 61 6e 74 55 6e |r, NULL,| kCantUn|
|00005fe0| 64 6f 2c 20 6b 44 6f 65 | 73 4e 6f 74 43 61 75 73 |do, kDoe|sNotCaus|
|00005ff0| 65 43 68 61 6e 67 65 2c | 20 4e 55 4c 4c 2c 20 69 |eChange,| NULL, i|
|00006000| 74 73 4d 65 73 73 61 67 | 65 2c 20 69 74 73 52 65 |tsMessag|e, itsRe|
|00006010| 70 6c 79 29 20 0d 23 65 | 6e 64 69 66 0d 7b 0d 23 |ply) .#e|ndif.{.#|
|00006020| 69 66 6e 64 65 66 20 4d | 41 43 41 50 50 5f 52 5f |ifndef M|ACAPP_R_|
|00006030| 31 33 0d 09 49 6e 69 74 | 69 61 6c 69 7a 65 46 72 |13..Init|ializeFr|
|00006040| 6f 6d 41 70 70 6c 65 45 | 76 65 6e 74 28 69 74 73 |omAppleE|vent(its|
|00006050| 43 6f 6d 6d 61 6e 64 4e | 75 6d 62 65 72 2c 20 4e |CommandN|umber, N|
|00006060| 55 4c 4c 2c 20 6b 43 61 | 6e 74 55 6e 64 6f 2c 20 |ULL, kCa|ntUndo, |
|00006070| 6b 44 6f 65 73 4e 6f 74 | 43 61 75 73 65 43 68 61 |kDoesNot|CauseCha|
|00006080| 6e 67 65 2c 20 4e 55 4c | 4c 2c 20 69 74 73 4d 65 |nge, NUL|L, itsMe|
|00006090| 73 73 61 67 65 2c 20 69 | 74 73 52 65 70 6c 79 29 |ssage, i|tsReply)|
|000060a0| 3b 0d 23 65 6e 64 69 66 | 0d 7d 0d 0d 2f 2f 2d 2d |;.#endif|.}..//--|
|000060b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006100| 2d 2d 2d 2d 2d 2d 0d 23 | 70 72 61 67 6d 61 20 73 |------.#|pragma s|
|00006110| 65 67 6d 65 6e 74 20 41 | 44 6f 43 6f 6d 6d 61 6e |egment A|DoComman|
|00006120| 64 0d 0d 76 6f 69 64 20 | 54 53 63 68 65 64 75 6c |d..void |TSchedul|
|00006130| 65 53 65 72 76 65 72 43 | 6f 6d 6d 61 6e 64 3a 3a |eServerC|ommand::|
|00006140| 44 6f 49 74 28 29 09 2f | 2f 09 4f 56 45 52 52 49 |DoIt()./|/.OVERRI|
|00006150| 44 45 0d 7b 0d 09 2f 2f | 20 49 6e 20 72 65 73 70 |DE.{..//| In resp|
|00006160| 6f 6e 73 65 20 74 6f 20 | 61 20 6c 6f 6f 6b 75 70 |onse to |a lookup|
|00006170| 20 72 65 71 75 65 73 74 | 20 66 72 6f 6d 20 74 68 | request| from th|
|00006180| 65 20 63 6c 69 65 6e 74 | 2c 20 66 69 6e 64 73 20 |e client|, finds |
|00006190| 74 68 65 20 64 6f 63 75 | 6d 65 6e 74 0d 09 2f 2f |the docu|ment..//|
|000061a0| 20 74 68 61 74 20 63 61 | 6e 20 61 63 63 6f 6d 6d | that ca|n accomm|
|000061b0| 6f 64 61 74 65 20 74 68 | 65 20 61 70 70 6f 69 6e |odate th|e appoin|
|000061c0| 74 6d 65 6e 74 2c 20 69 | 66 20 61 6e 79 2e 20 50 |tment, i|f any. P|
|000061d0| 72 65 70 61 72 65 73 20 | 74 68 65 20 72 65 70 6c |repares |the repl|
|000061e0| 79 20 74 6f 0d 09 2f 2f | 20 72 65 74 75 72 6e 20 |y to..//| return |
|000061f0| 74 6f 20 74 68 65 20 63 | 6c 69 65 6e 74 2e 0d 0d |to the c|lient...|
|00006200| 09 44 61 79 49 6e 64 65 | 78 09 74 68 65 44 61 79 |.DayInde|x.theDay|
|00006210| 09 3d 20 66 4d 65 73 73 | 61 67 65 2d 3e 52 65 61 |.= fMess|age->Rea|
|00006220| 64 53 68 6f 72 74 28 6b | 41 45 44 61 79 29 3b 0d |dShort(k|AEDay);.|
|00006230| 09 54 69 6d 65 49 6e 64 | 65 78 09 74 68 65 54 69 |.TimeInd|ex.theTi|
|00006240| 6d 65 09 3d 20 66 4d 65 | 73 73 61 67 65 2d 3e 52 |me.= fMe|ssage->R|
|00006250| 65 61 64 53 68 6f 72 74 | 28 6b 41 45 54 69 6d 65 |eadShort|(kAETime|
|00006260| 29 3b 0d 0d 09 54 69 6d | 65 49 6e 64 65 78 09 74 |);...Tim|eIndex.t|
|00006270| 68 65 44 75 72 61 74 69 | 6f 6e 3b 0d 09 43 53 74 |heDurati|on;..CSt|
|00006280| 72 32 35 35 09 09 64 6f | 63 75 6d 65 6e 74 54 69 |r255..do|cumentTi|
|00006290| 74 6c 65 3b 0d 0d 09 4d | 41 5f 44 59 4e 41 4d 49 |tle;...M|A_DYNAMI|
|000062a0| 43 5f 43 41 53 54 28 54 | 53 63 68 65 64 75 6c 65 |C_CAST(T|Schedule|
|000062b0| 41 70 70 6c 69 63 61 74 | 69 6f 6e 2c 20 66 43 6f |Applicat|ion, fCo|
|000062c0| 6e 74 65 78 74 29 2d 3e | 49 73 41 70 70 6f 69 6e |ntext)->|IsAppoin|
|000062d0| 74 6d 65 6e 74 41 76 61 | 69 6c 61 62 6c 65 28 74 |tmentAva|ilable(t|
|000062e0| 68 65 44 61 79 2c 20 74 | 68 65 54 69 6d 65 2c 20 |heDay, t|heTime, |
|000062f0| 74 68 65 44 75 72 61 74 | 69 6f 6e 2c 20 64 6f 63 |theDurat|ion, doc|
|00006300| 75 6d 65 6e 74 54 69 74 | 6c 65 29 3b 0d 0d 09 2f |umentTit|le);.../|
|00006310| 2f 20 68 61 76 65 20 74 | 68 65 20 61 70 70 6c 69 |/ have t|he appli|
|00006320| 63 61 74 69 6f 6e 20 6c | 6f 6f 6b 20 69 74 20 75 |cation l|ook it u|
|00006330| 70 0d 0d 09 66 52 65 70 | 6c 79 2d 3e 57 72 69 74 |p...fRep|ly->Writ|
|00006340| 65 53 68 6f 72 74 28 6b | 41 45 44 75 72 61 74 69 |eShort(k|AEDurati|
|00006350| 6f 6e 2c 09 09 74 68 65 | 44 75 72 61 74 69 6f 6e |on,..the|Duration|
|00006360| 29 3b 0d 09 66 52 65 70 | 6c 79 2d 3e 57 72 69 74 |);..fRep|ly->Writ|
|00006370| 65 53 74 72 69 6e 67 28 | 6b 41 45 44 6f 63 75 6d |eString(|kAEDocum|
|00006380| 65 6e 74 2c 20 09 64 6f | 63 75 6d 65 6e 74 54 69 |ent, .do|cumentTi|
|00006390| 74 6c 65 29 3b 0d 7d 0d | 00 00 00 00 00 00 00 00 |tle);.}.|........|
|000063a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.